(программирование) в цехе работают а человек, из них в не являются спортсменами. сколько процентов от общего числа составляют спортсмены?

А-B   всего спортсменов
(A-B/A)*100

var a,b;integer;
begin
read (a,b);
writeln (( a-b)/a)*100,
end.