Есть ответ 👍

Какое наибольшее число нужно написать вместо многоточия, чтобы 2 раза напечаталось слово "привет"? i:=12; repeat writeln( 'привет'); i:=i-2 until i<...;

285
437
Посмотреть ответы 1

Ответы на вопрос:


Відповідь:

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.

Популярно: Информатика