Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию.

Var
    i: integer;

begin
    for i := 1 to 10 do
        writeln('Ваши имя и фамилия');
end.

Var a :integer;
begin
for a:=1 to 10 do
begin
writeln('ТВОЕ ИМЯ');
writeln('ТВОЯ ФАМИЛИЯ');
end;
end.