Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
ghost96
0 / 0 / 1
Регистрация: 15.10.2015
Сообщений: 24
1

Комбинированный тип данных: определить количество служащих, родившихся в заданном месяце

21.05.2016, 22:29. Просмотров 877. Ответов 2
Метки нет (Все метки)

Организовать ввод, хранение в массиве, вывод на экран данных о служащих: фамилия, имя, отчество, дата рождения (число, месяц, год), образование. Вывести на экран данные о служащих, которые имеют высшее образование. По данным сведениям определить количество служащих, родившихся в данном месяце (вводится с клавиатуры).
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.05.2016, 22:29
Ответы с готовыми решениями:

Количество дней в заданном месяце
Надо составить программу, которая в зависимости от порядкового номера...

Комбинированный тип данных
Помогите пожалуйста с задачкой, очень вас прошу Составить программу...

Комбинированный тип данных...
Известна зарплата каждого из 5 работников фирмы за каждый месяц первого ...

Комбинированный тип данных
Помогите с пакой задачей: напечатать фамилии и даты рождения студентов, не...

Найти количество дней в заданном месяце
program daysmonth; var days,month,flag:integer; begin write ('vvedite mesyac...

2
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3886 / 2866 / 3641
Регистрация: 05.06.2014
Сообщений: 14,101
22.05.2016, 11:37 2
Распечатать фамилии детей детского сада, которые родились в определённом месяце
0
ghost96
0 / 0 / 1
Регистрация: 15.10.2015
Сообщений: 24
22.05.2016, 21:09  [ТС] 3
Лучший ответ Сообщение было отмечено ghost96 как решение

Решение

помогите доделать что бы выводило еще образование
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
type d=record
 year,month,days:byte;
 fam:string[15];
 nam:string[10];
 ot:string[15];
 end;
var A:array[1..100] of d;
i,n,m:byte;
begin
write('Введите количество служащих: ');readln(n);
for i:=1 to n do
begin
writeln('Введите информацию о ',i,' служащем');
write('Фамилия ');readln(A[i].fam);
write('Имя');readln(A[i].nam);
write('Отчество');readln(A[i].ot);
write('День рождения ');readln(A[i].days);
write('Месяц рождения');readln(A[i].month);
write('Год рождения');readln(A[i].year);
end;
write('Введите месяц рождения для вывода списка: ');readln(m);
writeln('---------------------------------------------------');
writeln('Фамилия|Имя|Отчество|День рождения|Месяц рождения|Год');
writeln('---------------------------------------------------');
for i:=1 to n do
if A[i].month=m then writeln(A[i].fam:15,'|':1,A[i].nam:8,'|':1,A[i].ot:9,'|':1,A[i].days:5,'|':1,A[i].month:5,'|':1,A[i].year:9,'|':1);
readln;
end.
Добавлено через 5 часов 17 минут
А всё не надо допер своим тупым мозгом
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.05.2016, 21:09

Комбинированный тип данных (запись)
Описать массив записей, который содержит информацию о нескольких деталях...

Комбинированный тип данных – записи
Создать справочник «Хлебобулочный комбинат», содержащий информацию:...

Обработка данных типа запись (комбинированный тип данных).
Вывести ФИО и отметки по физике студентов, имеющих средний балл, больше 4,5. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru