НАЙТИ средний бал за контрольную работу если кол-во учеников…

Question

НАЙТИ средний бал за контрольную работу если кол-во учеников выполнявших работу n. Также найти колличество учеников которые получили оченку 4 или 5, атакже оченку 2

Answer 1

77

blustitel

10 сентября 2022

Не наю че за гамбаспишу на паскале var a: array[1… 100] of integer; i,n,k5,k4,k2: integer; s: real; Begin read (n); for i: =1 to n do begin writeln ('Ввведите оценку учиника ',i); readln (a[i]); s: =s+a[i]; if a[i]=5 then k5: =k5+1; if a[i]=4 then k4: =k4+1; if a[i]=2 then k2: =k2+1; end; writeln (s/n,k5,k4,k2); End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: