Решите пожалуйста задача по информатике(в паскале). Универмаг за декабрь заработал А...

Question

Решите пожалуйста задача по информатике(в паскале). Универмаг за декабрь заработал А миллиона , 15% от прибыли в декабре заработали октябре. сколько рублей заработала компания в октябре

Answer 1

Var a:real;
begin
 readln(a);
 a:=a/100*15;
 writeln(a);
end.