我有一个项目,我需要做一些数学计算
例如,如果用户输入了数字6765333
现在我必须分析给定的数字应除以180
我将获得37585.183333333
现在开始出现主要问题
我想将37585
和.183333333
然后仅将.183333333
乘以6
所以我应该1.1
这一切都应该在给出新的动态数字后自动完成
这是在windows应用程序中
希望有人能帮助我吗?答案 0 :(得分:1)
尝试,
decimal no = 6765333m / 180;
Console.WriteLine(no);
Console.WriteLine(decimal.Remainder(no, 1) * 6);
VB语法:
Dim no = 6765333 / 180
Dim no1=Decimal.Remainder(no, 1) * 6
Dim no2=Decimal.Round(no1, 1)
答案 1 :(得分:0)
最终解决方案
Dim i As Double = 6765333
Dim j As Double = i / 180
Dim k As Double = j - Math.Floor(j)
Dim sk As String = CStr(k).Substring(0, 11) ' truncate after 9 decimal digits
k = CDbl(sk)
Dim l As Double = Math.Round((k * 6) * 10) / 10 ' round on 1 decimal
答案 2 :(得分:-2)
你可以尝试这个..
decimal val=6765333;
decimal divNum=180;
decima ans= val/divNum;
int intVal = ans;
int decVal = ans-intVal;
//Now You Get decVal = .183333333. So you can calculate it.