В 9А классе 28 человек написали контрольную работу поистории. Найти число
В 9А классе 28 человек написали контрольную работу по
истории. Найти число двоек, троек, четверок и пятерок, полученных в
итоге написания работы, а также вывести средний балл посреди
мальчиков и посреди девочек.
Нужна программка в PASCAL.
var a, b, c,d,e,f,g : integer;
begin
for var i := 1 to 28 do begin
readln(a);
if a = 2 then b := b + 1
else if a = 3 then c := c + 1
else if a = 4 then d := d + 1
else if a = 5 then e := e + 1;
if i lt;= 14 then f := f + a
else g := g + a;
end;
f := round(f / 14);
g := round(g / 14);
writeln('Число двоек : ',b);
writeln('Число троек : ',c);
writeln('Число четвёрок : ',d);
writeln('Число пятёрок : ',e);
writeln('Число двоек : ',a);
writeln('Средний балл среди мальчишек : ', f);
writeln('Средний балл среди девченок :', g);
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.