Ребята,помогите,очень нужно. В классе 20 учеников писали контрольную работу по физике. Оценки задаются как целые случайные числа в интервале от 2 до 5. Напишите программу,которая подсчитывает средний балл за контрольную и опред...
Ребята,помогите,очень нужно.
В классе 20 учеников писали контрольную работу по физике. Оценки задаются как целые случайные числа в интервале от 2 до 5. Напишите программу,которая подсчитывает средний балл за контрольную и определяет количество учеников, получивших балл ниже среднего.
Гость
Ответ(ы) на вопрос:
Гостьconst
n = 20;
var
x: array[1..n] of integer;
i, k, s: integer;
c:real;
begin
Randomize;
Writeln('Полученные баллы');
s := 0;
for i := 1 to n do
begin
x[i] := Random(4)+2;
Write(x[i]:2);
s:=s+x[i];
end;
Writeln;
c:=s/n;
k:=0;
for i := 1 to n do if x[i]
Не нашли ответ?
Похожие вопросы