為何說我輸入只有一行

var a,b,c:integer;
begin
  readln(a,b);
  c:=a mod b;
  if c=0 then writeln('Ok!')
         else writeln('Impossib1e!');
end.