UC知道帮忙看下这个程序应当用什么软件做
来源：百度知道 编辑：UC知道 时间：2024/06/12 23:17:27
新版数学书上的例题，我想找个编程软件自己做出来试一下，但是用vb直接输入不行。
程序是这样的
input "a,b,d=":a,b,d
DO
m=(a+b)/2
g=a^2-2
f=m^2-2
if g*f<0 then
b=m
else
a=m
end if
loop until abs(a-b)<d or f=0
print m
end
新版高中数学书上这些就是一个完整的程序，应该用什么软件？
麻烦说得具体点，最好可以给出软件下载地址，谢谢
程序是这样的
input "a,b,d=":a,b,d
DO
m=(a+b)/2
g=a^2-2
f=m^2-2
if g*f<0 then
b=m
else
a=m
end if
loop until abs(a-b)<d or f=0
print m
end
新版高中数学书上这些就是一个完整的程序，应该用什么软件？
麻烦说得具体点，最好可以给出软件下载地址，谢谢
你这个代码的核心部分VB是能识别的！但要稍微修改一下！你用复制，粘贴的方法要想让计算机来识别，恐怕不太现实！
1、input "a,b,d=":a,b,d 这一句识别不了。他是让你输入a，b，d的具体值，而上面的代码用字母表示。VB中你不妨换成a=1: b=1: c=1这样子，要具体数字赋值，字母的话程序怎么运行呢？所以说这一句本身就不能运行！
2、利用VB运行代码，要略懂一二，比方说如何做界面？代码添加到哪里？程序如何运行？书写一点都不能错！多个逗号都不行！
3、注意最后一句end，VB中用end sub表示，因为它以sub开头。
4、其他地方均能运行！
5、遗憾的是a，b，d不知道具体值，所以你写的这个代码没有具体结果！
具体做法：（不妨设a＝1，b＝1，d＝1）
1、打开VB，添加个Command1控件。
2、在Command1控件的Click事件下面添加下面的代码。
a = 1
b = 1
d = 1
Do
m = (a + b) / 2
g = a ^ 2 - 2
f = m ^ 2 - 2
If g * f < 0 Then
b = m
Else
a = m
End If
Loop Until Abs(a - b) < d Or f = 0
Print m
4、启动程序，鼠标单击Command1，窗体出现1，这就是运行结果！
这个方法适合你调试其他代码！我发现高中写的伪代码，核心部分VB都能识别，就是赋值的时候，input语句不行。你可以采用直接赋值的方法（比如input a，换成a=1）
如果哪些地方不清楚可以来问我！
我可以帮你调试其他代码！
C语言写的