ПРОШУ ПОМОГИТЕ!!! ПОЖАЛУЙСТА))) Вводя по очереди оценки по контрольной работе 20 учащихся, определить, сколько из них было неудовлетворительных
ПРОШУ ПОМОГИТЕ!!! ПОЖАЛУЙСТА))) Вводя по очереди оценки по контрольной работе 20 учащихся, определить, сколько из них было неудовлетворительных
Ответ(ы) на вопрос:
паскаль
for i:=1 to 20 do begin
readln(ozenka);
if ozenka<=2 then k:=k+1; end;
writeln(k);
думаю, объяснений не надо...
Не нашли ответ?
Похожие вопросы