求助
pascal吧
全部回复
仅看楼主
level 1
PASCAL怎么去掉小数点后多余的0
2015年02月07日 07点02分 1
level 4
var a:real;
begin
readln(a);
writelb(a:0:0);
end.
2015年02月07日 08点02分 2
谢谢
2015年02月07日 08点02分
回复 信息xxxx回家 :[哈哈]
2015年02月07日 08点02分
level 4
在输出的时候加:0:0
2015年02月07日 08点02分 3
谢谢
2015年02月07日 08点02分
回复 信息xxxx回家 :[哈哈]
2015年02月07日 08点02分
level 7
果断Trunc
2015年02月07日 14点02分 4
+1
2015年02月07日 14点02分
+1
2015年02月07日 14点02分
+10086
2015年02月09日 01点02分
+1
2015年02月13日 12点02分
1