....?
话说薛猫怎么还没来。。
用pascal得出8F的解。。。
...
1.35590967386348
vb代码:
Private Sub Command1_Click()
Dim a, b, c As Double
a = 1
c = 1
For i = 1 To 1000000
a = a / 4
b = 1 + a
c = c * b
Next
Text1.Text = c
End Sub
1.355909673863479
C++解
#include
#include
#include
using namespace std;
int main()
{
double s=1;
for(int i=1;i