За решение 4 задач студент получил оценки (от 1 до5) Составьте программу, которая определит среднее значение оценок, полученных студентом за задачи! РЕШИТЕ ПЛИЗ В ПАСКАЛЕ!!!!! 8 КЛАСС!!
За решение 4 задач студент получил оценки (от 1 до5) Составьте программу, которая определит среднее значение оценок, полученных студентом за задачи!
РЕШИТЕ ПЛИЗ В ПАСКАЛЕ!!!!! 8 КЛАСС!!
Гость
Ответ(ы) на вопрос:
Гостьvar
i,x:integer;
sr:real;
begin
sr:=0;
for i:=1 to 4 do
begin
write('Оценка за задачу №',i,' ');
readln(x);
sr:=sr+x;
end;
sr:=sr/4;
write('Средняя оценка ',Round(sr));
End.
Не нашли ответ?
Похожие вопросы