ПЛИЗ!ХЕЛП МИ!Известна масса каждого из 12 предметов,определить общую массу всего набора.ЭТО ИЗ УЧЕБНИКА ИНФОРМ ПО ПРОГРАММИРОВАНИЮ 9 КЛ.НАДО ЗАПИСАТЬ КАК ЭТО БУДЕТ В ПАСКАЛЕ
Answers & Comments
alexooooonvar a,b,i:integer; begin b:=0; for i:=1 to 12 do begin readln(a); b:=b+a; end; write(b); end.
Answers & Comments
begin
b:=0;
for i:=1 to 12 do
begin
readln(a);
b:=b+a;
end;
write(b);
end.