Дан фрагмент программы. Что появится на экране?

var

S:=0;

for i:=1 to 4 do

begin

A[i]:=i^2-1

S:=s+A[i];

End;

writeln (s);

Question

Ларисса

23 февраля, 20:58

+3

Ответы (1)

Знаешь ответ?

Эля · Answer 1

Трассировочная таблица:

А1 0

А2 3

А3 8

А4 15

S 0 3 11 26

I 1 2 3 4

Ответ: 26

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