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

var

S:=0;

for i:=1 to 4 do

begin

A[i]:=i^2-1

S:=s+A[i];

End;

writeln (s) ;

Question

Анисим

21 мая, 14:04

+2

Ответы (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) ;