Предмет: Информатика,
автор: ddden
помогите пожалуйста с pascal abc в пяти тестовых опросах мальчик получил оценки.Составите алгоритм и программу,которая определит среднее значение оценок, полученных мальчиком в пяти опросах
Ответы
Автор ответа:
0
var
a,sum,i:integer;
begin
for i:=1 to 5 do
begin
readln (a);
sum:=sum+a;
end;
writeln (sum/5);
end.
Похожие вопросы
Предмет: Математика,
автор: q1hnxo
Предмет: Химия,
автор: urijpanasenko4
Предмет: Қазақ тiлi,
автор: berekebeisenbek
Предмет: Биология,
автор: cfyz1458