Question

Что будет напечатано в результате работы программы, при k=302?

var k, number: integer;
begin
write('Введите день года: ');
readln(k);
number := k mod 7;
writeln('Номер дня недели: ',number);
end.

Answer 1

Ну в общем то, просто выведет остаток от деления k/7, так как mod - отбрасывает целую часть числа.