Дні тижня пронумеровані наступним чином: 0 — неділя, 1 — понеділок, 2 — вівторок, …, 6 — субота. Дано ціле число K, що лежить в діапазоні 1-365. Визначити номер дня тижня для K-го дня року, якщо відомо, що цього року 1 січня бу...
Дні тижня пронумеровані наступним чином: 0 — неділя, 1 — понеділок, 2 — вівторок, …, 6 — субота. Дано ціле число K, що лежить в діапазоні 1-365. Визначити номер дня тижня для K-го дня року, якщо відомо, що цього року 1 січня було понеділком.
Гость
Ответ(ы) на вопрос:
Гостьvar k,n:integer;
begin
readln(k);
n:=k mod 7;
writeln('n = ',n);
end.
Пример:
34
n = 6
Не нашли ответ?
Похожие вопросы