Дано целое число k. Определите, каким будет k-й день года: выходным (суббота и воскресенье) или будним (понедельник, вторник, среда, четверг, пятница), если 1 января — понедельник ( На паскале)
program dayofyear; var k: integer; begin write('Введите номер дня года: '); read(k); if k mod 7 = 5 then writeln('Выходной'); else if k mod 7 = 6 then writeln('Выходной'); else writeln('Будний день'); end.
program dayofyear;
var k: integer;
begin
write('Введите номер дня года: ');
read(k);
if k mod 7 = 5 then
writeln('Выходной');
else if k mod 7 = 6 then
writeln('Выходной');
else
writeln('Будний день');
end.