Freepascal：试编写一个根据用户键入的两个操作数和一个运算符，由计算机输出运算结果的程序。

下面程序中倒数第一个flag换成true，则输入某个数与0相除，输出为0.00，为什么； 如果在此基础上再删去result：=0，也还是一样，又是为什么？这个result：=0到底是干什么用的?
var
result x,y:real;
ch:char;
flag:boolean;
begin
readln(x,y);
readln(ch);
result:=0;
flag:=true;
case ch of
'+':result:=x+y;
'-':result:=x-y;
'*'result:=x*y;
'/':if y<>0 then
result:=x/y
else
flag:=false;
end;
if flag then writeln(result:0:2)
else writeln('error');
end.

如果flag变成true，那么一定执行writeln(result:0:2)，这句话的意思是保留两位小数;result：=0是变量初始化，由于pascal默认将全局变量初始化为0，所以删不删都一样

我不会~~~但还是要微笑~~~：）