Решить ! вычислить выражение с использованием стандартных функций языка pascal : в классе n учеников. после контрольной было получено: a - пятерок, b - четверок, c - троек. найти процент троек, четверок и пятерок.

Predator123765 Predator123765    1   20.06.2019 01:30    2

Ответы
26Регинка 26Регинка  02.10.2020 05:51
Var N,A,B,C : integer; 
begin 
   writeln ('Количество человек в классе:'); readln(N);

   writeln ('Количество пятёрок:'); readln (A);

   writeln ('Количество четвёрок:'); readln(B);  

   writeln ('Количество троек;'); readln(C);   

   writeln ('Процент пятёрок: ', A*100 div N,'% ', 'Процент четвёрок: ', B*100 div N, '% ', 'Процент троек: ',C*100 div N, '% ');    readln; 

   end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика