OJ Board

Eric: Your WA is in fact a runtime error caused by extra empty lines at the end of the input. The statement Readln (Nu, De); tries to read the values, but there are no more left to read.

I added a line to your code and got accepted:
[pascal]Begin
While not eof Do
Begin
if eoln then begin ...