Cоставьте программу, которая выводит на экран в столбик n раз число a (а и n(n>0) вводятся пользователем с клавиатуры). В паскале

program raf105;

var a,n,i: integer;

begin

write('n = ');

readln(n);

write('a = ');

readln(a);

for i:=1 to n do

 writeln(a);

end.