Есть ответ 👍

или подскажите хотя бы как делать​

276
485
Посмотреть ответы 2

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


1.

var i:Integer;

begin

i:=30;

while i <> 71

do begin

writeln(i);

i:=i+1;

end;

end.

2.

var i:Integer;

begin

i:=1;

while i <> 31

do begin

writeln('Имя Фамилия');

i:=i+1;

end;

end.


ответ: ответ №2

Объяснение:

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