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

Var a as string, i as integer;
//Просто запрашиваешь имя через
readln(a)
//а потом выводишь 10 раз в цикле
for i = 1 to 10 do
writeln(a);