qbasic中的问题
qbasic 4.5
上面菜单debug---make exe 即可
大概是这样，试试看吧！！
QBASIC的几个问题
悬赏分：30 - 离问题结束还有 14 天 23 小时
1、完善下列程序，使其能求出从键盘输入的任意一个非负数的算术平方根。
INPUT X
IF X>=0 THEN
LET S= sqr (s)
PRINT S
ELSE
PRINT X;"没有实根"
ENDIF
END
3、写出下列程序运行结果。
LET A=36
LET B=4
LET C=SQR(A)+B
PRINT C
END
运行结果: 10
4、完善下列程序，使其能求出12+10+8+……+2之和。
LET S=0
FOR I=12 TO 2 STEP -2
LET S= S+I
NEXT I
PRINT S
END
7、写出下列程序运行结果。
LET A=9.6
LET B=2
LET B= INT(A/3)
PRINT B
END
运行结果: 3
8、完善下列程序，使其能求出1+2+3+……+20之和。
LET S=0
FOR I=1 TO 20
LET S= S + I
NEXT I
PRINT S
END
11、写出下列程序运行结果。
LET A=3.2
LET B=4.6
LET C=INT(A+B)
PRINT C
END
运行结果: 7
12、完善下列程序，使其能求出10+8+6+……+2之和。
LET S=0
FOR I=10 TO 2 STEP -2
LET S= s+I
NEXT I
PRINT S
END
13、完善下列程序，使其能求出1+1.1+1.2+1.3+……+100之和。
LET S=0
FOR I= 1 TO 100 STEP 0.1
LET S=S+I
NEXT I
PRINT S
END
16、求N+(N-1)+(N-2)+……+3+2+1，完善下面的程序
LET S=0
INPUT N
FOR I=N TO 1 STEP -1
LET S= S+I
NEXT I
PRINT S
END
17、写出下列程序运行结果。
S=0
FOR X=1 TO 5
LET S=S+1
NEXT X
PRINT S
END
运行结果: 5
18. 写出下列程序运行结果。
S=0
FOR X=10 TO 2 STEP -4
LET S=S+X
NEXT X
PRINT S/X
END
运行结果: -9
19、完善下列程序，该程序的功能是：从键盘上任意输入的两个数,求最大数。
INPUT A , B
IF A>B THEN
MAX= A
ELSE
MAX=B
ENDIF
PRINT “MAX=” ; MAX
END
20、完善下列程序，该程序的功能是：从键盘输入一个数，如果这个数不等于零，那么输出它的倒数，否则不显示。
INPUT X
IF X0 THEN
LET Y= 1/X
PRINT Y
END IF
END
第三题中SQR是求平方根！不可能是负数的！
第四题的确是 -2 我少打了负号！
第七题INT是求整函数！意思是A/3之后等于3.2 再用INT对其取整！
十七题是对S进行累加！FOR 循环几次就累加几次！
十八题是让一个变量S对X进行取数相加！X等于多少！S就将其累加！
例如X进行FOR 循环之后依次是10 6 2
S就将这三个数相加！最后一个S/X 要注意X的值并不是2 而应该是 负二
因为当FOR进行了三次递减之后，X是2，在程序看来并没有破出循环条件！所以最后还进行了一次减法，
但进行最后一次递减之后循环条件破出了！所以下面就没有再执行！
运行依次是：10+6+2 / -2
这只能说明 ^2运算有误差，可能是浮点运算，把j转成10.0000000，造成10^2=99.9999999（计算机中比较常见，但j*j可能是把j当整数乘，精确；不过不打紧。不是吧，你还在纠结这问题啊。
j = 1
FOR j = 1 TO 100
PRINT j * j,
PRINT j ^ 2,
PRINT j * j < 10000,
PRINT j ^ 2 < 10000
PRINT 10000 - j * j,
PRINT 10000 - j ^ 2
NEXT j
试运行这一段，会发现
看见最后一点了吗？当数很大时发生误差，且为1.766357E-15，也就是0.000000000000001766357但也就是这致命的误差，造就了逻辑判断走上另一条路。
所以，做什么事都要严谨。
运算精度不同造成的，这种例子挺多的，还有水仙花数时也有这样的现象。
天龙microsoftvisualbasic运行错误
缺少必要的组件或库、程序错误等。1、天龙microsoftvisualbasic运行时，需要使用MicrosoftVisualBasic相关的组件或库，缺失或损坏必要的组件或库，会导致运行错误。2、程序中的逻辑错误或语法错误会导致天龙microsoftvisualbasic运行错误，可以通过检查代码并修复错误来解决问题。
BASIC小小问题..
1.INPUT 和变量之间要有空格！2.20可以用INPUT b 3.10中 INPUT a 和INPUT b之间用冒号“：”隔开而不是逗号。4.在行号10前的一行是什么？属于程序吗？如果属于赋值语句也要加行号。5.结果根据10输入的a值和20输入的b值计算。6.说实话，现在的BASIC都不用写行号的了。
basic的问题
因为数值前有一个空位，这个空位称符号位。如果是是正数，通常容易出错，第二个数如果是负数的话，这个结果就不会有疑问了
qbasic中的问题
这只能说明 ^2运算有误差，可能是浮点运算，把j转成10.0000000，造成10^2=99.9999999（计算机中比较常见，但j*j可能是把j当整数乘，精确；不过不打紧。不是吧，你还在纠结这问题啊。j = 1FOR j = 1 TO 100PRINT j * j,PRINT j ^ 2,PRINT j * j < 10000,PRINT j ^ 2 < 10000PRINT...
关于basic语言的简单问题(在线等 急)
你的老师是对的.if 条件1 then 语句1 else 条件2 语句2 end if else并不是假设,而是所有的非条件1情况.但 if条件1 then if 条件2 then 语句1 else 语句2 end if else 语句3 end if 中的then里面应该是结果,而不是假设 懂了吗.
word 启动时,microsoft visual basic 加载过程中出现错误
出现此问题的原因为：系统异常导致的。解决的方法和详细的操作步骤如下：1、第一步，在Word中打开“文件”选项，找到并单击下拉菜单中的“选项”这一项，见下图，转到下面的步骤。2、第二步，完成上述步骤后，需要在弹出的页面框中单击“加载项”选项，然后单击其下方名为“转到”的按钮，见下图，转到...
关于QBasic的问题。
第一题：这个不是死循环么；算出来等于2500。这里面的这个S是存放累加数的变量。i是for循环语句的控制循环次数的变量，初值为1，每执行循环体一次，i增值2，直至超过99不再执行循环体。s=s+i，不是算术式，这里的“=”在QBASIC中是“赋值”，即把S+i的赋给变量S。第二题：J是for循环语句的...
关于Basic语言的一些问题
input前加val()转换一下。另外既然你输入的数字不带小数，那最好是把guess定义为long 要实现“*”显示，需要再加入一个窗体，加入Textbox,将其Password属性设置为“*”，将窗体用vbmodel显示，返回时检查输入。。。
“下标越界”是VB中的什么问题?
实时错误9：“下标越界”是Visual Basic中的一种常见编程错误。该错误的出现意味着在访问数组、集合或其他类似数据结构时，所使用的下标超出了该数据结构的有效范围。在VB中，数组和其他集合类型都有明确的边界，当下标超出这些边界时，就会触发“下标越界”错误。详细解释如下：1. 下标越界的含义：在编程...
Basic的一个问题
在立即窗口(Immediate)中输入的命令会被立即执行。QB打开后在屏幕下面就可以看到，VB默认不显示，可以按Ctrl+G打开 例如输入 print 1+1 回车后会立即显示结果 2
琦吕压氏： 在cmd模式下可运行,但由于屏幕显示模式的限制,许多语句会出错,甚至不运行.32位xp、win7存在同样的问题.完美的解决办法,只有安装虚拟机了.比如微软的Virtual PC.可以到“虚拟机之家”查询相关信息.
江南区18629175929： Qbasic随机产数问题对随机产生的100个0到50之间的随机整数用一个数组存放后进行排序,然后再将其中重复出现的数进行删除,只保留一个,使得剩下的... - ？
琦吕压氏：[答案] CLSDIM a(100)FOR i = 1 TO 100RANDOMIZE TIMERa(i) = INT(RND * 52) - 1NEXT iFOR i = 1 TO 99FOR j = i + 1 TO 100IF a(i) > a(j) THEN SWAP a(i), a(j)IF a(i) = a(j) THEN a(j) = -1NEXT jNEXT ij = 1FOR i = 1 ...
江南区18629175929： Qbasic中输入语句的问题 - ？
琦吕压氏： 当然可以啦 只不过要用文件读写(从一个文件输入数据,从另外一个文件输出) 按照你提出的问题,我可以写出这样一个程序 CLS 清屏幕语句 OPEN ＂input.in＂ FOR INPUT AS #1 打开文件input.in OPEN ＂input.out＂ FOR OUTPUT AS #2 ...
江南区18629175929： 有关Qbasic的问题？
琦吕压氏： 你在程序末加个 input a 就好了 要关就再输一个数
江南区18629175929： 一道QBASIC的题下面程序用于统计从键盘输入字符串中,英文字母“a”的个数.请将程序补充完整.clss=0input st$for x=1 to - _____if - ____ - =＂a＂ then s=... - ？
琦吕压氏：[答案] 这道题的纲要,知道LEN函数为统计字符串长度的. (1)LEN(ST$) 要知道MID$函数是干什么的,一个一个的取,取出来判断就可以了. (2)MID$(ST$,X,1) 正如楼主所说的,第三个填的是(s=s+1) 这个程序很简单啊,如果有QBASIC问题可以百...
江南区18629175929： qbasic的一个简单问题,求解,谢谢 - ？
琦吕压氏： CLSM=INT(RND*2)+9INPUT ＂＂,NX=M*NPRINT XEND
江南区18629175929： 请懂Qbasic的人帮我解答里面的问题？
琦吕压氏： #include<stdio.h> int main() {int a; scanf(＂%d＂,&a); if((a&1)==1) printf(＂a is 奇数\n＂); if((a&1)==0) printf(＂a is 偶数\n＂); return 0; } } 自己改改不就成了啊
江南区18629175929： 求4道QBASIC题答案!1.编写程序统计10个数中奇数的和,偶数的乘积.2.编写程序,输出的图案如下:* * * * ** * * ** * * * * *3.从键盘上输入3个数,按从小到... - ？
琦吕压氏：[答案] 1.DIM A(10)FOR I = 1 TO 10INPUT ＂SHU＂;A(I)NEXT IFOR I = 1 TO 10IF A(I) MOD 2 0 THEN HE=HE+A(I)NEXT IJI=1 ----注意,这里要负值1,因为0*任何数还是0FOR I = 1 TO 10IF A(I) = 0 THEN GOTO 10------0*任何数还...
江南区18629175929： QBasic问题!条件语句! - ？
琦吕压氏： print是普通的执行语句,与if..then..else本身没有关系啊……在块if(就是if..then...else..end if拆开的语句)中,根据条件满足与否分别执行第一部分和第二部分;举个例子:if a=0 then pri...
江南区18629175929： QBASIC程序题解答 - ？
琦吕压氏： LET Y=0 FOR I=1 TO 21 STEP 4 LET Y=Y+I NEXT I PRINT Y END 因为题目所给的数列等差为4 所以变量Y从1开始每次加4,一直加到21就是答案了 过程:I=1 Y=0+1=1 I=1+4=5 Y=1+5=6 I=5+4=9 Y=6+9=15 …… I=21 Y=Y+21=你要求的那个数 然...
