Составить программу на каком-либо языке программирования (указать версию языка) или алгоритмическом языке. (паскаль) на вход программе , полученные каждым учеником на егэ по информатике, каждое число в отдельной строке. первой строкой подаётся количество таких записей. оценка «5» выставляется, если ученик набрал 80-100 , «4» - 60-79, «3» - 40-59. минимальный для получения положительной оценки составляет 40 . определите, какое количество учеников получили оценки «5», «4», «3», «2».

Ataka4 Ataka4    2   31.07.2019 00:40    0

Ответы
milenluiz milenluiz  28.09.2020 10:28
Program ege;var kol,bal,pyt,chet,tri,dva,i:integer;beginread(kol);for i:=1 to kol dobeginread(bal);case bal of80..100:pyt:=pyt+1;60..79:chet:=chet+1;40..59:tri:=tri+1;1..39:dva:=dva+1;end;end;writeln('Оценок 5: ', pyt);writeln('Оценок 4: ', chet);writeln('Оценок 3: ', tri);writeln('Оценок 2: ', dva);end.
Составить программу на каком-либо языке программирования (указать версию языка) или алгоритмическом
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика