Регистрация
FadePLAY
18.06.2021 09:38
Информатика
Есть ответ 👍

Напишите программу на pascal abc. имеются данные по оценкам за контрольную работу 10 учащихся. написать программу, определяющую, сколько учащихся имеют высшую оценку (5).

166
299
Посмотреть ответы 2

Ответы на вопрос:

asdsssssssssss124
asdsssssssssss124
4,4(73 оценок)
Const n=10; var n, a, c: integer; begin for i: =1 to n do begin write ('оценка='); read (a); end; c: =0; for i: =1 to n do begin if a=5 then begin c: =c+1; end; end; write (c); end.
Ymnushca
Ymnushca
4,7(100 оценок)
37(8)+1=40(8). ответ 40(8)

Популярно: Информатика