有几题pascal请教高手

公务员

Description

一个小镇上的人，他们认为该镇的公务员人数应该控制在全镇人口的P%与Q%之间，即超过P%且不到Q%比较合适。
如果告诉你P和Q的值，你能计算出该镇至少有多少人吗？

Input

只有一行共有二个数：P Q
( 10 < P < Q < 20 )

Output

只有一行且只有一个正整数：该小镇至少拥有的人数

Sample Input

13 14.1

Sample Output

15

Source

基础题

谢谢高手们

VAR
p,q:double;
n,x:cardinal;
BEGIN
readln(p,q);
n:=1;
x:=trunc(q*n/100);
while(p*n/100>=x) do
begin
inc(n);
x:=trunc(q*n/100);
end;
writeln(n);
readln;
END.