Создать массив, каждый элемент которого рассчитывается по формуле: I^2-1, где I – индекс...

Question

Создать
массив, каждый элемент которого рассчитывается по формуле: I^2-1, где I – индекс
элемента массива. Вывести полученный
массив на экран, расположив каждый элемент в отдельной строке.

Comments

Сколько элементов в массиве?

---

больше ничего не указано, но до него усть задание, может они как то связаны:

---

1.Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона. Вывести созданный массив на экран, расположив элементы в одну строку через пробелы. Заменить все отрицательные элементы квадратом соответствующего индекса.

Answer 1

Program abc;
const
   n = 10;
var
   m: array [1..n] of integer;
   i: integer;
begin
for i := 1 to n do
   begin m[i] := sqr(i) - 1;
   writeln(m[i]);
end;
end.