Напишите программу для решения следующей задачи. На контрольной работе по алгебре ученикам 9 класса было предложено 10 примеров. Неудовлетворительная оценка выставляется, если правильно решено менее половины примеров. Сколько неудовлетворительных оценок было получено учениками? Если хотя бы один из учеников правильно решил все задачи, выведите YES, иначе выведите NO. Программа получает на вход количество учеников в классе N (1 ≤ N ≤ 30), затем для каждого ученика вводится количество правильно решённых примеров.ЯЗЫК С+++
ilyamaximov514
3
16.12.2020 16:33
27
Другие вопросы по теме Информатика
kotik53Tv
04.08.2019 16:20
Abrak24
14.09.2019 17:30
axeltrofimsky
19.05.2020 11:26
соаовоых
19.08.2019 22:00
варкатоп
25.05.2019 17:50
fhderDgy
25.05.2019 16:48
Никейти
25.05.2019 17:50
камила20053
25.05.2019 16:49
Палина200413
25.05.2019 17:50
Іруна
25.05.2019 16:49
Популярные вопросы
- Із яким кримським хоном у березні 1648 р. Б.Хмельницький уклав договір...
2 - И всё вокруг не мило. как пишется не мило слитно или раздельно и...
2 - Найти длину единичной окружности...
2 - Можете объяснить пошаговое решение . То что отмечено зелёным это...
2 - нужно краткое содержание 22 параграфа)) История России(Данилов,...
1 - Твiр на тему ;чи потрiбно вiрити в щастя) зарубiжна лiтература...
3 - Самостоятельная работа. «Оксиды».8 класс. Вариант № 2.1. Составьте...
1 - На столе лежит пластинка из стекла. Во сеолько раз увеличится давление...
2 - Розвяжить ривняня x^2-9/x+3=0...
2 - Військовим скарбом у Гетьманщені називали......
1
var a,b,c,d,e:integer;
begin
d:=1;
e:=0;
writeln('введите количество учеников');
readln(a);
for b:=1 to a do begin
writeln('введите количество правильных ответов для ',d,' ученика' );
readln(c);
while (c>10) or (c<0) do begin
writeln('вы ввели неверное число, попробуйте снова');
readln(c);
end;
if c = 10 then e:=e+1;
d:=d+1;
end;
if (e>=1) then writeln('yes ')
else writeln('no');
end.
Объяснение: