С клавиатуры вводится целое число N. Распечатать число 20 в строку N раз через пробел. (использовать цикл спараметром)
var n,i:integer; a:array [1..1000] of integer; begin readln(n); for i:=1 to n do begin write(20,' '); end; end.