程序设计复习.doc

程序设计复习程序设计复习 程序改错题 1 下列程序为求 s 1 1 3 1 5 1 7 1 99 之值 精确到小数后两位 程序中有错误 改正后运行程序 将程序执行结果填入答案框内 set talk off s 0 n 1 do while n500 EXIT ENDIF STORE 3 X TO X ENDDO Y SET TALK ON RETURN 1092 3 已知 S1 1 S2 1 2 S3 1 2 3 SN 1 2 N 下面的程序求 S20 到 S80 有多少数能被 17 或 35 整除 改正后运行程序 将程序执行结果填入答案框内 SET TALK OFF I 20 N 0 DO WHILE I 80 STORE 1 TO S J 1 DO WHILE J 100000 的最小的整数 N 程序中有错误 改正后运行程序 将程序执行结果填入答案框内 set talk off s 0 n 1 do while s 100000 s s n 3 n n 1 enddo n return 5 计算 S 1 5 9 13 k 直到累乘数 k 25 中止 程序中有错误 改正后运行程序 将 程序执行结果填入答案框内 SET TALK OFF CLEAR s 0 k 1 DO WHILE T s s k IF k 25 EXIT ENDIF k k 4 ENDDO s RETURN 6 下面的程序是求 1 到 500 的偶数立方和与奇数立方和之差 程序中有一处错 更正程序中的错误 运行更正后的程序 记录运行结果 将结果填入答题窗口内 SET TALK OFF STORE 0 TO I S1 S2 DO WHILE I 500 I I 1 IF MOD I 2 0 S1 S1 I I I ELSE S2 S2 I I I ENDIF ENDDO S1 S2 SET TALK ON RETURN 7 下面的程序是计算 1 2 3 4 5 的积 要求其积大于 10000 后结束程序运行 输出 乘积的值 程序有一处错误 更正程序中的错误 运行更正后的程序 记录运行结果 将结果 填入答题窗口内 SET TALK OFF STORE 1 TO X Y DO WHILE X10000 LOOP ENDIF ENDDO Y SET TALK ON RETURN 8 已知一个数列的前三个数是 1 2 3 从第四个数起 每个数都是前三个数之和 下面的程 序是求出该数列的第 35 个数 改正程序中的错误后运行程序 将程序执行结果填入答案框 内 SET TALK OFF DIME A 35 A 1 1 A 2 2 A 3 3 I 4 DO WHILE I 35 A I A I 1 A I 2 A I 3 I I 1 ENDDO A 35 SET TALK ON RETURN 4846 9 下面的程序是求在 1 2 3 4 10 这 10 个数中 任意选 两个不同的数 求它们的和能 被 2 整除的数的总对数 注意 象 3 5 和 5 3 认为是同一对数 程序中有一处错误 改 正程序中的错误后运行程序 将程序执行结果填入答案框内 SET TALK OFF CLEAR N 0 I 1 DO WHILE I 10 J 1 DO WHILE J I IF INT I J 2 I J 2 N N 1 ENDIF J J 1 ENDDO I I 1 ENDDO N SET TALK ON RETURN 四 程序填空题 1 下列的程序是求 S 8 9 10 的程序 在下列程序中填上缺少的语句或 另外编写程序 程序名由考生自定 运行程序 将结果填入答题窗口 SET TALK OFF CLEAR S 0 I 8 DO WHILE I 10 STORE 1 TO T J DO WHILE J 680000 为止的最大阶乘数 n SET TALK OFF CLEAR s 0 n 3 DO WHILE T T 1 FOR I 1 TO n T T I NEXT s s t IF S 680000 EXIT ENDIF ENDDO n 3 下面的程序是求出 1 到 5000 之间的能被 5 整除的前若干个奇数之和 当和大于 500 时 退出 在下列程序中填上缺少的语句或另外编写程序 程序名由考生自定 运行程序 将结果填入答题窗口 SET TALK OFF CLEAR I 1 S 0 DO WHILE I 5000 AND S 500 IF S S I ENDIF I I 1 ENDDO S SET TALK ON RETURN 4 设 S 1 1 2 1 3 1 N N 为正整数 编程求使 S 不超过 10 的最大的 N 程序名由考 生自定 在下列程序中填上缺少的语句或另外编写程序 运行程序 将结果填入答题窗口 set talk off clear s 0 i 1 do while s 5000 j 2 do while j 5000 j 2 do while jb c 且 a b cb c 且 a b c 30 求满足条件 1