能不能用vf帮我做一下这两道题呀~请帮我把注释也写一下,有很多不懂的,帮我写详细一点,

学习 时间:2026-04-08 03:37:43 阅读:4427
能不能用vf帮我做一下这两道题呀~请帮我把注释也写一下,有很多不懂的,帮我写详细一点,1、计算1到100的立方根,将结果存于外存,文件名为ROOT.C2、编写程序,实现计算并输出3到n之间(含3和n)所有素数的平方根之和.例如,n=100,则输出s=148.874270,注意:要求n的值大于2但不大于100.

最佳回答

甜蜜的小丸子

天真的翅膀

2026-04-08 03:37:43

1。LOCAL i DIMENSION X3(100) && 定义100行的数组 FOR i = 1 TO 100X3[i] = i^(1/3) && i 的 1/3 次方ENDFORDISPLAY MEMORY LIKE X3 TO FILE "ROOT。C" && 输出到文件 2。CLEARLOCAL a,i,j,k,m,n,sk = 0DIMENSION Z(1) && 预定义 Z 数组,储存 100 以内的质数FOR i = 2 TO 100 && i (2 到 100) 查找质数m = 1 && 预置质数检查标志FOR j = 2 TO i-1 && 将 i 试除 j (2 到 i-1)IF MOD(i,j) = 0 && 如果整除m = 0 && 非质数EXIT && 退出 j 循环ENDIFENDFORIF m = 1 && 如果质数k = k + 1 && 刷新 Z 行数DIMENSION Z(k) && 重定义 Z 大小Z[k] = i && 将 质数 存入 ZENDIFENDFORINPUT "输入 n (2

最新回答共有2条回答

  • 忧郁的山水
    回复
    2026-04-08 03:37:43

    1。LOCAL i DIMENSION X3(100) && 定义100行的数组 FOR i = 1 TO 100X3[i] = i^(1/3) && i 的 1/3 次方ENDFORDISPLAY MEMORY LIKE X3 TO FILE "ROOT。C" && 输出到文件 2。CLEARLOCAL a,i,j,k,m,n,sk = 0DIMENSION Z(1) && 预定义 Z 数组,储存 100 以内的质数FOR i = 2 TO 100 && i (2 到 100) 查找质数m = 1 && 预置质数检查标志FOR j = 2 TO i-1 && 将 i 试除 j (2 到 i-1)IF MOD(i,j) = 0 && 如果整除m = 0 && 非质数EXIT && 退出 j 循环ENDIFENDFORIF m = 1 && 如果质数k = k + 1 && 刷新 Z 行数DIMENSION Z(k) && 重定义 Z 大小Z[k] = i && 将 质数 存入 ZENDIFENDFORINPUT "输入 n (2

上一篇 四子词语来形容( 我只想到了如释重负的暑假 还有( ( (

下一篇 从4个女同学5个男同学中任选4人做代表,至少有一个女2个男,共有几种选法?