|
|
вернуться в форумWhat wrong with my solution??? Послано meoden 21 фев 2002 09:17 I don't understand. Can I help me?
This is my code:
{@judge_id: 14971CM 1011 Pascal}
const
maxx=20000;
var p,q:real;
x:longint;
begin
read(p,q);
for x:=1 to maxx do if int(p*x/100)<>int(q*x/100) then break;
write(x);
end. Sorry, Now I know what wrong. Thanks. Послано meoden 21 фев 2002 10:11 > I don't understand. Can I help me?
> This is my code:
>
> {@judge_id: 14971CM 1011 Pascal}
> const
> maxx=20000;
> var p,q:real;
> x:longint;
>
> begin
> read(p,q);
> for x:=1 to maxx do if int(p*x/100)<>int(q*x/100) then break;
> write(x);
> end.
|
|
|
