Реферат: Курсовая работа программирование на Pascal
FindMaxMin(dmin,dmax,days);
WriteDates(dmin,dmax,days);
END.
9. ПРИЛОЖЕНИЕ 2. РЕЗУЛЬТАТЫ РАБОТЫ
-------------------------------------------------------------
Программа расчета благоприятных дней
Ввод данных осуществляйте через пробел
Окончание ввода данных подтвердите с помощью клавиши ENTER
--------------------------------------------------------------
Введите дату рождения в формате ДД ММ ГГГГ: 22 02 1922
Введите текущую дату в формате ДД ММ ГГГГ: 12 09 2001
Прошло: 29057 дней, 697368 часов, 41842080 минут, 251052480 секунд.
---------------------------------------------------------------
Наименее благоприятный день: 3-окт -2001
Наиболее благоприятный день: 12-сент-2001
.
[1] Йенсен К., Вирт Н. Руководство для пользователя и описание языка.
[2] Тот же