tyvj1474打鼹鼠的输入问题

这是主程序
begin
fillchar(f,sizeof(f),0);
readln(n);
readln(m);
while m<>3 do
begin
if m=1 then begin read(x,y,k);add(x,y,k);end;
if m=2 then begin read(x1,y1,x2,y2);writeln(check(x1,y1,x2,y2));end;
readln(m);
end;
end.
输入的时候
4
1 2 2 5
2 0 0 2 3
3
就没输出
4
1
2
2
5
2
0
0
2
3
3
就有答案