Предмет: Информатика,
автор: tot636
100 балов даю , срочно надо
Приложения:
tot636:
Еще можешь сделать?
допустим
Давай
Все
Сделал
Решай
Сделай
Пж
Надо срочно
готово
Ответы
Автор ответа:
0
program Week;
var d, n: integer;
begin
readln(d);
readln(n);
writeln((d - 1 + n) mod 7 + 1);
end.
Интересные вопросы
Предмет: Химия,
автор: solosenkokostantin
Предмет: Информатика,
автор: ualihanrasulzan358
Предмет: Математика,
автор: levchukmaria
Предмет: Литература,
автор: anisimovaslava0012
Предмет: Биология,
автор: wanzin4