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

//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var s:=ReadString('введите свое имя и фамилию:');
for var i:=1 to 10 do s.Println;
end.

Var i: Integer;
a,b: String;
begin
writeln('Введите своё имя');
readln(a);
writeln('Введите свою фамилию');
readln(b);
for i:=1 to 10 do
begin
writeln(i,'. ',a+' '+b);
end;
end.