您所在位置：主题：我一个很急的问题，帮个忙吧！！在此现说声谢谢
23838828
[专家分：0] 发布于 2005-09-13 00:09:00
有没有人帮我一个忙，在此现说声谢谢
请问为什么我在Tubro Pascal可以用
而在Virtual Pascal会出现乱码
Virtual Pascal会出现乱码
program circle;
const PI=3.14159;
var r,c,s:real;
begin
write('Enter R=');readln(r);
c:=2*pi*r;
s:=pi*sqr(r);
writeln('c=',c:10:2);
writeln('s=',s:10:2);
end.
结果在super pascal编译失败
应该怎么办呢？
如果可以的话，请马上发个贴过来吧！
请问为什么我在Tubro Pascal可以用
而在Virtual Pascal会出现乱码
Virtual Pascal会出现乱码
program circle;
const PI=3.14159;
var r,c,s:real;
begin
write('Enter R=');readln(r);
c:=2*pi*r;
s:=pi*sqr(r);
writeln('c=',c:10:2);
writeln('s=',s:10:2);
end.
结果在super pascal编译失败
应该怎么办呢？
如果可以的话，请马上发个贴过来吧！
