program name;
var
i: integer;
begin
for i := 1 to 20 do
writeln('Ваши Имя и Фамилия');
end.
Объяснение:
program name; // Название программы
i: integer; // Целочисленная переменная счетчик
begin // Начало программы
for i := 1 to 20 do // Повторяем цикл 20 раз
writeln('Ваши Имя и Фамилия'); // Выводим сообщение в консоль с новой строки
end. // Конец программы
program name;
var
i: integer;
begin
for i := 1 to 20 do
writeln('Ваши Имя и Фамилия');
end.
Объяснение:
program name; // Название программы
var
i: integer; // Целочисленная переменная счетчик
begin // Начало программы
for i := 1 to 20 do // Повторяем цикл 20 раз
writeln('Ваши Имя и Фамилия'); // Выводим сообщение в консоль с новой строки
end. // Конец программы