Предмет: Информатика,
автор: hfhfrbhfbhfbfb
дан целочисленный массив из 30 элементов.Элементы массива могут принимать целые значения от 0 до 100-баллы учащихся за итоговый тест по
информатике.Опишите на русском языке или на одном из языков програмирования алгоритм, который позволяет найти и выводит средний балл учащихся сдавших экзамен(оценка более 20 баллов)
Ответы
Автор ответа:
2
Для вычисления среднего балла учащихся, сдавших экзамен, нужно просмотреть все 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
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
Похожие вопросы
Предмет: Українська література,
автор: sobakazabiyaka
Предмет: Русский язык,
автор: Аноним
Предмет: Английский язык,
автор: ВикаКотик283627
Предмет: Математика,
автор: ishkovakristi87
Предмет: Русский язык,
автор: gip96