|
Вопрос # 3 792/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
У меня сложилась такая проблема. Дан масив записей с такими полями: ФИО ученика, день и месяц рождения. Нужно вывести на экран список учеников, которые родились летом. У меня проблема с самим алгоритмом поиска такого ученика. Кто сможет, помогите, ПЛЗ!!!!
 |
Вопрос задал: Дмитриев Сергей Анатольевич (статус: Посетитель)
Вопрос отправлен: 20 февраля 2010, 15:29
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 2; последнее сообщение — 20 февраля 2010, 18:59; участников в обсуждении: 2.
|
min@y™ (статус: Доктор наук), 20 февраля 2010, 16:01 [#1]:
Перебираешь массив записей в цикле и смотришь, если месяц рождения от 6 до 8, значит тогда было лето... 
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
IlluminatI (статус: 2-ой класс), 20 февраля 2010, 18:59 [#2]:
type
TRec = record
Name, Surname, Otch: string; // имя, фамилия, отчество
Day: string; // нам не важен день, можно и в строке хранить
Month: byte;
end;
var a: array [1..n] of TRec;
i: integer;
begin
// заполняем записи...
// ...
// ...
// поиск...
for i:=1 to n do
if a[i].Month in [6..8] then // если месяц летний
writeln(a[i].Name,' ',a[i].Surname); // выводим то, что нужно
end.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
