С клавиатуры вводится целое число N. Распечатать число 20 в строку N раз через пробел. (использовать цикл с параметром)

1

Ответы и объяснения

2013-01-30T19:40:32+00:00

var n,i:integer;

a:array [1..1000] of integer;

begin

readln(n);

for i:=1 to n do begin

write(20,' ');

end;

end.