用VF怎么实现输入一元二次方程系数求根，编程
答案:1 悬赏:60 手机版
解决时间 2021-04-13 14:56
- 提问者网友：心如荒岛囚我终老
- 2021-04-13 08:09
用VF怎么实现输入一元二次方程系数求根，编程
最佳答案
- 五星知识达人网友：渡鹤影
- 2021-04-13 09:10
clear
text
一元二次方程求解
ax^2+bx+c=0
endtext
input "请输入a的值：" to a
input "请输入b的值：" to b
input "请输入c的值：" to c
m=b*b-4*a*c
if m>=0
x1=(-b+sqrt(m))/(2*a)
x2=(-b-sqrt(m))/(2*a)
?"x1的值是：",x1
?"x2的值是：",x2
else
?"此方程无实根!"
endif追问还有个问题，用VF实现1-2+3-4+5-6+7-8+9-10，我会多加分，谢谢，我学VF的，程序太差追答clear
s=0
for i=1 to 10
k=(-1)^(i+1)
s=s+i*k
endfor
?"1-2+3-4+5-6+7-8+9-10=",s
text
一元二次方程求解
ax^2+bx+c=0
endtext
input "请输入a的值：" to a
input "请输入b的值：" to b
input "请输入c的值：" to c
m=b*b-4*a*c
if m>=0
x1=(-b+sqrt(m))/(2*a)
x2=(-b-sqrt(m))/(2*a)
?"x1的值是：",x1
?"x2的值是：",x2
else
?"此方程无实根!"
endif追问还有个问题，用VF实现1-2+3-4+5-6+7-8+9-10，我会多加分，谢谢，我学VF的，程序太差追答clear
s=0
for i=1 to 10
k=(-1)^(i+1)
s=s+i*k
endfor
?"1-2+3-4+5-6+7-8+9-10=",s
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯