var a,b,c:longint;beginwhile not eof do begin readln(a,b); c:=a mod b; if c=0 then writeln('Ok!') else writeln('Impossib1e!');end;end.
他說我的程式RE200,到底我有甚麼錯?
code200指被0除,有可能b是0,而a不是,要输出'Impossib1e!'。