Ручка стоит k рублей, к 1 сентябрю она подорожала на p%. Определите, сколько ручек можно купить на s рублей после подорожания. Составить программу на Pascal.
Var a,k,s,p: real; begin readln(k,s,p); a:=s/(k+k*(p/100)); writeln(a); end.