Question

用visual foxpro编程作业 任意输入两个数，按从大到小的顺序输出

任意输入一个正整数，编写程序求0到该数之间所有奇数的和

Answer 1

clear
input "请输入第1个数：" to a
input "请输入第2个数迹嫌：冲州袭"散兄 to b
?max(a,b),min(a,b)

追问

求一元二次方程ax^2+bx+c=0的根，其中a，b，c都由用户输入，假设输入的数据也能使b平方减4ac>0成立

追答

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

追问

任意输入一个年份，判断该年是否为闰年

追答

有完没完？？看这个吧

参考资料： http://zhidao.baidu.com/question/329048815.html