Учебник Л.Л Босовой. 8 класс
Напишите программу, которая 10 раз выводит ваши имя и фамилию

program qq;

begin

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

Writeln ('ИмяФамилия');

end.

Объяснение:

Ну или (если с циклом)

program qq;

begin

for i:=1 to 10 do

Writeln ('ИмяФамилия');

end.