Страницы 191-195 параграф 4 4 вопрос / задание 10, ГДЗ по информатике за 8 класс к учебнику Босовой просвещение

program Z_10_5;

var

  s: string;

  i: byte;

begin

  write('Введи имя и фамилию ');

  readln(s);

  for i := 1 to 10 do

    writeln(s)

end.