Question

Заполнить массив из 9 элементов степенями 2, начиная с 20=1. Массив объявлен как var mas12: array [0..8] of integer. Вывести значения элементов на экран в одну строку через пробел.

Answer 1

var mas12:array[0..8] of integer;
   i:integer;
begin
mas12[0]:=1;
write('1');
for i:=1 to 8 do begin
  mas12[i]:=2*mas12[i-1];
  write(' ',mas12[i]);
end;
end.

Answer 2

Program2.pas(8) : Ошибка времени выполнения: Индекс находился вне границ массива.

Answer 3

Исправь, пожайлуйст