Хелп ми! известна масса каждого из 12 предметов,определить общую массу всего набора.это из учебника информ по программированию 9 кл.надо записать как это будет в паскале

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