составить программу которая считает сумму последовательности из 12 чисел

1

Ответы и объяснения

2013-03-25T21:40:46+04:00

var b,i,c: integer; A: array[1..12] of integer ;

begin

c:=0;

for i:=1 to 12 do

begin

read (b);

a[i]:=b;end;

for i:=1 to 12 do

begin

c:=c+a[i]; end;

writeln(c);end.