pascal格式出错

Question

假设x，y是整数，编写程序，输出x的y次方的最后3位数（数值在int32范围内）。

输入部分：

多组数据，每组输入两个整数：x和y

输出部分：

对应每组输入，有一组输出，每组输出之间以空行分隔，每组输出为三行，分别是x的y次方的个位数、十位数、百位数。

输入样例：

12 2
23 3

输出样例：

4
4
1

7
6
1
我的pascal程序如下：
uses math;
var a,b:real;
begin
while not eof do
begin
readln(a,b);
writeln(trunc(power(a,b))-trunc(power(a,b)/10)*10);
writeln(trunc(power(a,b)/10)-trunc(power(a,b)/100)*10);
writeln(trunc(power(a,b)/100)-trunc(power(a,b)/1000)*10);
end;
end.
请大家帮我看一下错在哪里？
编译没有问题，但评判网站总报格式错。
回楼下的：
如果不用math函数库power函数就用不了了，所以一定要加，问题也不会出现在这里。

Answer 1

我晕。。。。。
就算不是格式错误
你的程序也是错的
这道题本意是写高精，，，三位的高精
你却想用real过掉。。。。
题目中的数据范围是指x和y的范围。不包括中间计算值的范围。
你的power()函数很可能就溢出了
建议你放弃这个思路
老老实实写高精吧

Answer 2

math函数没问题。
你的程序应该加文件的，否则就不好退出while循环了。

Answer 3

参考答案 尊重生命，完全尊重生命。

Answer 4

not eof 没有定义