Паскаль. вычислить какой день недели введенная дата. если год начался с понедельника.

87009522377 87009522377    2   03.10.2019 08:00    0

Ответы
Anna200689898098654 Anna200689898098654  09.10.2020 13:49

//PascalABC.NET v3.3 1633

begin

 var days: array [1..7] of string:=('Понедельник', 'Вторник', 'Среда', 'Четверг', 'Пятница', 'Суббота', 'Воскресенье');

 var n:=ReadLnInteger('Введите номер дня: ');

 writeln(n+' день — ' + days[n mod 7]);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы