the input.txt will not be 2 lines,the first line may contain P and q,
so,when you use Pascal,you should be careful about this.
  E.G.
  readln(p);
  readln(q);
 this prog is wrong
you should change it into
readln(p,q);