2
已采纳
李牧之
新手光能
新手光能
用循环读入,再相加每种的个数。
for i:=1 to n do
begin
read(a,b,c);
x:=x+a;
y:=y+b;
z:=z+c;
end;
最后把每种个数乘相应的分数,再相加。
s:=x*3+y*2+z;
0
0
0
0
-2