Написать на Pascal.Вычислить средний балл по физике 9 класса от 10 до 30 учащихся.
var l,i,k:integer;
Begin
Readln(k);
for i:=1 to k do begin
Readln(l);
sum:=sum+l
end;
writeln(sum/k);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var l,i,k:integer;
Begin
Readln(k);
for i:=1 to k do begin
Readln(l);
sum:=sum+l
end;
writeln(sum/k);
end.