program Main;
{'pascal常数的四则运算'}
CONST
a=25;
b=5;
var
c:integer;
d:real;{除法}
begin
writeln(' ');
writeln(' pascal常数的四则运算');
writeln(' ');
writeln(' 苹果手机上编译通过 2013-7-25');
writeln(' ');
c:=a+b;
writeln('a=25,b=5');
writeln('a+b=',c);
c:=a-b;
writeln('a-b=',c);
c:=a*b;
writeln('a*b=',c);
d:=(a+b)/2;
writeln('(a+b)/2=',d:0:2);
end.

使用结果表明苹果手机上的pascal可以输入汉字，并可以运行显示汉字！

啥软件啊？

苹果手机上的Pascal程序。

怎么觉得这个程序……

乱！

估计百度又吞换行符和空格了吧