Даны следующие типы данных:
type Дата= record
День:1..31;
Месяц: 1..12;
Год: integer;
end;
Ученик= record
ИмяФамилия:string;
ДатаРождения:Дата;
end;
СписокУеников= array [1..4] of Ученик;
Напишите программу, которая вводит с клавиатуры данные: фамилии и мена тех, кто родился в день x месяца

Решение задачи - в прилагаемом файле

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку
×