Дан целочисленный массив из 30 элементов.Элементы массива могут принимать целые значения...

Question

Дан целочисленный массив из 30 элементов.Элементы массива могут принимать целые значения от 0 до 100-баллы учащихся за итоговый тест по
информатике.Опишите на русском языке или на одном из языков програмирования алгоритм, который позволяет найти и выводит средний балл учащихся сдавших экзамен(оценка более 20 баллов)

Answer 1

Для вычисления среднего балла учащихся, сдавших экзамен, нужно просмотреть все n=30 учащихся и найти сумму баллов s и количество k для тех учащихся, которые набрали более 20 баллов, а затем получить и вывести s/k с нужной точностью.

const
  n=30;
var
  x:array[1..n] of integer;
  i,k,s: integer;
begin
  Randomize;
  Writeln('Результаты сдачи');
  k:=0; s:=0;
  for i:=1 to n do
  begin
    x[i]:=Random(101);
    Write(x[i]:4);
    if x[i]>20 then begin s:=s+x[i]; Inc(k) end
  end;
  Writeln;
  Writeln('Средний балл сдавших равен ',s/k:6:3)
end.

Тестовое решение:
Результаты сдачи
  39  10  74  74  46  61  22  11   6  48  17  62  21  98  69  54  12   4  38  72  53  46  92  16  87  67  34  44  45  86
Средний балл сдавших равен 57.913