Вывести на экран число 30 раз

Дано целое число A. Вывести на экран в столбец 30 раз число A.

Введем число a с клавиатуры. Воспользуемся оператором цикла for с счетчиком i от 1 до 30, в теле цикла будем выводить число a.

Программа решения на языке Паскаль:

var i,a:integer;

begin

readln(a);

for i:=1 to 30 do

writeln(a);

end.