Предмет: Информатика, автор: 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

Похожие вопросы
Предмет: Українська література, автор: sobakazabiyaka
Переведите пожалуйста текст
Атамыз Қазақ өзінің Ақарыс ( Ұлы жүз атасы), Жанарыс ( Орта жүз атасы),
Бекарыс (Кіші жүз атасы) атты үш ұлына енші беруге шақырыпты.Сол ұлы
атамыз өзінің байлығың (малын,мүлкін) төрт бөлікке бөлген екен
дейді.Оның үш бөлігін аталған үш баласына еншіге беріпті.Төртінші
бөлігін тағы да үшке бөліп,оны балаларына енші үстіне қосыпты.Естерінде
болсың,бұрынғы өткен ата-бабаларымыз ақ білектін күшімен,ақ найзаның
ұшымен ұлан-байтақ жер қалдырды.Оны үшеуіңе тағы бөліп беремін.
Оңтүстік-шығысты Ақарыс, сен иелен. Ол ұлы жүз деп аталсын.Орталық және
солтүстікті Жанарыс,сен иелен.Ол Орта жүз деп аталсын.Батыс жақты
Бекарыс,сен басқар.Ол кіші жүз деп аталсын.Ондағы ойым мынадай.Сендер
енші алып бөлек үй болып шыққанмен,туыстық қатынастарың, ынтымақтарың
мен дәм-тұздарың бөлінбесін.Сендердің ұрпақтарың сапарға шыққанда жолға
азық-түлік алып жүрмесін.Әрбір қакақ баласы кез келген үйден ақысыз
қонақасы ішетін болсын.Олар жолда шөлдеп,сусап,қарны ашып жүрмесін.Менің
сендерге берген төртінші еншім сол.Сол Еншімді менің келер ұрпақтарым
ғасырдан ғасырға жеткізіп, менің осы өсиетімді бұлжытпай сақтасын!» -
деп батасын берген екен.
Предмет: Русский язык, автор: Аноним
Предмет: Английский язык, автор: ВикаКотик283627