Question

Написать программу,которая выводит на экран имя пользователя 22 раза и перед именем показывает номер имени от 1 до 22.
Паскаль.

Answer 1

var a:string;

i:integer;

begin

 writeln('введите имя пользователя');

 read(a);

 for i:= 1 to 22 do

   writeln(i,' ',a);

end.