В классе N девочек и M мальчиков. сколько учеников в классе? какой процент девочек и мальчиков?решить в паскале нужно
Var n,m:integer;
begin
write (Girls: );
readln (n);
write (Boys: );
readln (m);
writeln (All pupils: ,n+m);
writeln (Procents girls: ,n*100/(n+m));
writeln (Procents boys: ,m*100/(n+m));
end.
Оцени ответ
