1樓已經(jīng)有了pascal和vf版本
我這里補(bǔ)上c和vb版本
c版本
#include
int main()
{ int i,n;
scanf("%d",&n);
i=sqrt(n);
printf("%d",i);
system("PAUSE");
}
vb版本
Private Sub Form_Click()
Dim n As Integer
n = InputBox("n=")
Print Int(Sqr(n))
End Sub