Pascal вывести ** экран 5 строк с ручным вводом текста. Например С Новым Годом!

Question

Pascal вывести на экран 5 строк с ручным вводом текста. Например С Новым Годом!

Answer 1

Program dd;
var a:string;
i:integer;
begin
readln(a);
for i:=1 to 4 do 
writeln(a);
end.