Профиль пользователя pasha 9v-

1. Определите, что делает следующая программа и какой результат она выдаст на заданном массиве:

const n = 5;

a: array [l..n] of integer = (1, 2, 3, -1, -2);
var i: integer;
begin

for i := 2 to n do a[i] := a[i] * a[i — 1];
for i := 1 to n do write(a[i]: 3)
(прикреплено изображение)