Задачка в abc pascal, прошу написать полную программу от начала и до конца

Сформируйте массив по правилу: элементы массива P(a) равны своим индексам, увеличенным на один. Значение a описать в разделе констант. Выведите массив в строчку.

1

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

2012-10-01T12:14:25+00:00

const a = 10;

var b: array [1..a] of real;

      i: integer;

begin

  for i:= 1 to a do

    begin

      b[i]:= i + 1;

      write(b[i], '  ');

    end;

end.