Люба7 лет назад
var
name : string; // объявляем переменную, в которой будем хранить имя
n,i : integer; // объявляем переменные кол-во повторений и счетчик цикла
begin
writeln('Введите ваше имя'); // вывод на экран текстовой строки
readln(name); // считываем введенное с клавиатуры имя
writeln ('Введите количество повторений'); // вывод на экран текстовой строки
readln (n); // считываем введенное с клавиатуры количество повторений печати имени
for i:=1 to n do // цикл будет выполняться n раз
begin
writeln (name); // выводим на экран имя
end;
end.