На зачётной работе по физике ученикам 9 класса было предложено 12 задач. Зачёт можно получить, если правильно решить не менее 8 задач. Сколько учеников получило зачёт? Вычислите среднее количество правильно решённых задач учащимися, получившими зачёт. Гарантируется, что хотя бы один ученик сдал зачёт. Программа получает на вход количество учеников в классе N (1 ≤ N ≤ 30), затем для каждого ученика вводится количество правильно решённых задач.

Решение:

var i,n,b,c:integer;
begin
read(n);
for i:=1 to n do 
begin 
read(b); 
if b>=8 then c:=c+1; 
end;
writeln(Количесво учеников, сдавших экзамен: ,c)
end.