Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Cписки

Автор: Nagato 16.10.2011 13:44

Надо создать программу, если Дано, сделал много пунктов а 4 не получается решить, помогите если сможете, хоть советом или примером):

type Data = record
Deny: 1..31;
Mesyats: 1..12;
God: integer; end;
Celovek = record
ImiaFamilia: string;
DataRojdenia: Data;
end;
SpisokCelovek = array[1..50] of Celovek;

Сделать программу которая будет читать с клавиатуры данные n человек(n< или равно 50) и выводить на экран:
h. Список людей которые имеют больше v лет
i. Список людей в алфавитном порядке
j. Список людей упорядоченный в соответствии с датой рождения
k. Список людей такого же возраста (рожденных в том же году)

Автор: Nagato 17.10.2011 1:06

Не решил все, но завтра уже сдавать, так что можете не отвечать)

Автор: Lapp 17.10.2011 3:57

Nagato, погоди. Твоя тема озаглавлена "Списки", но то, что ты сделал, к спискам не имеет никакого отношения. Так что же тебе все-таки надо?.. blink.gif