Написать программу в Паскаль

zaj2015 zaj2015    1   28.03.2020 14:11    0

Ответы
ExKise ExKise  17.08.2020 20:48

var n:integer;

begin

Writeln('Введите количество дней: ');

  Read(n);

  Writeln(n, ' дней(я) = ', n div 7, ' недель ', n mod 7, ' дней(я)');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика