Question

Помогите последнее решить.

Answer 1

Ответ:

Объяснение:

var name : String;

   i : Integer;

begin

write('name = '); readln(name);

for i := 1 to 7 do writeln(name);

end.

Answer 2

Ответ:

Var

i: integer;

begin

for i := 1 to 7 do

write Ростик;

end.:

Ростик -это наше имя тоже сейчас это решаем,думаю это так