Заполните массив B [7] числами 4,5,6,7,9,16,25 и вывести его на экран помогите пожалуйста

1

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

2014-04-04T18:47:14+00:00
Const b:array[1..7] of integer=(4,5,6,7,9,16,25);
var
i:integer;
begin
for i:=1 to 7 do
write(b[i],' ');
end.