На предприятии за одну смену выпускается Х планшетов. Известно, что P% из них в черном корпусе, а остальные в белом. Написать программу для вычисления количества белых планшетов, выпускаемых за смену на предприятии. формула

Сделано в Pascal ABC:

Program White;

var X, P, Y: real;

begin

writeln ('Введите количество всех планшетов') ;

readln (X) ;

writeln ('Введите Р процентов планшетов в черном корпусе') ;

readln (P) ;

Y:=X - (X * (P/100)) ;

writeln ('Планшетов в белом корпусе=', Y)

end.