Question

СРОЧНО!! ДАЮ 35 (больше нет) БАЛЛОВ. Нужно решить блок-схему на фото ​

Answer 1

Ответ:

program test;

var a: array [1..10] of integer;

i,s: integer;

begin

s:=0;

for i:=1 to 10 do

begin

a[i]:=2*i;

writeln('a[',i,']=',a[i]);

s:=s+a[i]

end;

write('s= ',s)

end.