Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Delphi > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 18.02.2013, 15:32   #1
PI5O
Новичок
Джуниор
 
Регистрация: 18.02.2013
Сообщений: 1
По умолчанию Задача на записи

Здравствуйте. Завтра ГОС экзамен и катастрофически не хватает времени разобрать задачу. желательно с комментариями. или хотя бы блок схему накидать а дальше я напишу. заранее благодарна
Известны данные о 16-ти сотрудниках фирмы: фамилия, возраст и отношение к воинской службе (военнообязанный или нет). Определить фамилии самых старших по возрасту людей среди военнообязанных и среди невоеннообязанных (считать, что такие есть и они единственные в своей группе).
PI5O вне форума Ответить с цитированием
Старый 18.02.2013, 19:13   #2
ViktorR
Участник клуба
 
Регистрация: 23.10.2010
Сообщений: 1,565
По умолчанию

Можно так:
1. Определить тип - запись:
Код:
Type Sotrudnik = record
             FIO : string[20];
            Age : integer;
      Services : boolean;
       end;
2. Определить массив из 16 элементов с типом Sotrudnik
Код:
 MasSotrydnik = array[1..16] of Sotrudnik;
3. Написать код для ввода данных о сотруднике.

4. Написать код для просмотра элементов массива и отбора по принадлежности к военнообязанным и не ...
При просмотре выбирать максимальный возраст для каждой категории сотрудников.
Проверка категории сотрудников:
Код:
if MasSotrudnik[i].Services then
     .... 
  else
     ....;

Как-то так ...
ViktorR вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача на записи xXxFEHUKCxXx Паскаль, Turbo Pascal, PascalABC.NET 1 01.12.2011 22:46
Задача на записи maziLa Паскаль, Turbo Pascal, PascalABC.NET 1 20.04.2009 16:53
Задача на записи quake1 Помощь студентам 5 07.03.2009 16:00
задача на записи!!! Нана Паскаль, Turbo Pascal, PascalABC.NET 2 18.04.2008 11:36


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS