Дан фрагмент программы.Что появится ** экране? var S:=0; for i:=1 to 4 do begin...

Question

Дан фрагмент программы.Что появится на экране?
var
S:=0;
for i:=1 to 4 do
begin
A[i]:=i^2-1
S:=s+A[i];
End;
writeln(s);

Comments

Вам должен быть дан массив, не могли бы вы его добавить

---

Извините,но это всё,что мне дано..Повторяем ранее изученное.

---

Извините, моя ошибка, сейчас напишу решение

Answer 1

Трассировочная таблица:
А1 0  
А2      3
А3           8
А4                  15
S 0     3    11    26
I   1     2   3       4
Ответ:26

Comments

Спасибо вам огромное :3

---

Надеюсь понятно, очень жаль, что нет функции таблицы