Question

ПЛИЗ!ХЕЛП МИ!Известна масса каждого из 12 предметов,определить общую массу всего набора.ЭТО ИЗ УЧЕБНИКА ИНФОРМ ПО ПРОГРАММИРОВАНИЮ 9 КЛ.НАДО ЗАПИСАТЬ КАК ЭТО БУДЕТ В ПАСКАЛЕ

Answer 1

var a,b,i:integer;
begin
b:=0;
for i:=1 to 12 do
begin
readln(a);
b:=b+a;
end;
write(b);
end.