為何說我輸入只有一行
var a,b,c:integer;
begin
readln(a,b);
c:=a mod b;
if c=0 then writeln('Ok!')
else writeln('Impossib1e!');
end.
為何說我輸入只有一行
var a,b,c:integer;
begin
readln(a,b);
c:=a mod b;
if c=0 then writeln('Ok!')
else writeln('Impossib1e!');
end.