Составьте программу, которая выводит на экран таблицу перевода n, n+1, n+2,... m дней количество недель.

Составьте программу, которая выводит на экран таблицу перевода n, n+1, n+2,... m дней количество недель.
Гость
Ответ(ы) на вопрос:
Гость
var i, n, m: integer; begin readln(n, m); for i := n to m do begin   if (i mod 7 = 0) then write(i div 7,' ') else write(i div 7 + 1,' '); end; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы