在DELPHI中如何将实数型转换成整型
展开全部
请参考以下代码：
Uses Math; var aa:Extended;begin aa:=3.28; ShowMessage(IntToStr(Trunc(aa))); //截取整数，小数不要 ShowMessage(IntToStr(Floor(aa))); //往小取整 ShowMessage(IntToStr(Ceil(aa))); //往大取整 ShowMessage(IntToStr(Round(aa))); //四舍五入取整end;
Uses Math; var aa:Extended;begin aa:=3.28; ShowMessage(IntToStr(Trunc(aa))); //截取整数，小数不要 ShowMessage(IntToStr(Floor(aa))); //往小取整 ShowMessage(IntToStr(Ceil(aa))); //往大取整 ShowMessage(IntToStr(Round(aa))); //四舍五入取整end;
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
