1樓：匿名使用者
多設幾個變數就可以了。
store 1 to n,s,a,b && n表示項數，s表示前n項和n=1
do while n<=10000 &&a表示連續幾個正項，b表示第幾個正項
n=n+1
b=b+1
if b<=a
s=s+1/n
else
s=s-1/n
b=0a=a+1
endif
enddo
?"s=",s
return
2樓：
clear
s=0p=1
input "請輸入n的值：' to nfor i=1 to n
s=s+p*(1/n)
p=-p
endfor
?'s=',s
cancel
3樓：匿名使用者
，現在忘了不少。。。。
幫你找找吧。。
第二十四題的答案不一定正確，其它全部都是正確答案。。。給分吧～～你說好是200大洋的，不許賴呀，再給100分～～！！！
1、關係模型
2、選擇、投影、聯接
3、do form t1
4、顯示全部記錄
5、表單(forln)檔案、報表(report)檔案、標籤(label)檔案
6、pack命令
7、clear
8、caption屬性
9、視窗介面
10、終止迴圈，將控制轉移到本迴圈結構enddo後面的第一條語句繼續執行
11、.f.
12、主索引、候選索引和唯一索引
13、b
14、3．142
15、local
16、open database《資料庫名》
17、資料庫表檔案
18、32位
19、二維表的列稱為屬性,二維表的行稱為記錄(元組)20、互動操作與程式執行
21、modi stru
22、.pjx
23、計算結果是123
24、1.5abc321
25、select 0
26、mpr
27、123abc321
28、.t.
29、表示式」win」-"winword"結果為.f. ，表示式」winword」="win"結果為.t.
30、.f.
31、結構化複合索引檔案
32、順序,選擇,重複(或迴圈)
補充題:
1、set talk off
clea
x=1s=0
do while x<=100
s=s+x
x=x+1
enddo
?"和為："
??sset talk on
retu
2、use sb
locate for not主要裝置
if found()廠 &&若查到，found函式返回.t.
display名稱，**
replace**with***（1-0.1）dispal名稱，**
endif
usereturn
3、不知
4、計算機湖南工院visual foxpro考試
用vb編寫計算s=1-1/2+1/3-1/4+1/5-1/6+1/7-1/8+1/9-1/10
4樓：匿名使用者
private sub command1_click()dim i as integer, s as doubles = 0
for i = 1 to 10
s = s + (-1) ^ (i - 1) * (1 / i)next i
print 0; s
end sub
用c語言程式設計：計算s=1-1/2+1/3-1/4+1/5……+1/m，其中m由輸入決定 30
5樓：匿名使用者
#include
#include
#include
int main()
printf("sum1=%lf\n",sum1);
printf("sum2=%lf",sum2);
scanf("%lf",×);
sum1=0;
sum2=0;
}printf("done\n");
return 0;
}這裡的sum1可以不看，是1+1/2+1/3+...+1/n的。
sum2則是題主的1-1/2+1/3...+1/n
6樓：匿名使用者
因為我們老師經常說，這個是無限小數，所以就等於1你們說對嗎1+1/2+1/3+1/4+1/5, 到1/50是不是等於1
7樓：
//#include "stdafx.h"//vc++6.0加上這一行.
#include "stdio.h"
int main(void)
for(s=0,i=1;i<
printf("the result is %f\n",s);
return 0;}
8樓：匿名使用者
可以看成兩個序列，正數和負數的。手動算下兩個累加和公式相減。。把m替換為變數，代表你的輸入值
9樓：匿名使用者
#include
int main()
s = 1.0;
for (i = 2; i <= m; i++)printf("s=%f\n", s);
return 0;}
c語言程式設計題，計算s=1-1/2+1/3-1/4.....+1/m
10樓：匿名使用者
n是整型，執行1/n後也是個整型。**修改：
#include
int main()
printf("%f\n",s);
return 0;}
11樓：天願見伊
由於你的n是int型，則1/n是整數，程式中的1/n或（-1）/n一直是0，所以s一直都是0；將t=1/n和t=（-1）/n改為t=1/(float)n和t=-1/(float)n即可，即將n強制轉換為float型，這樣1/n就可以表示為小數了。
希望可以幫到你！
12樓：selonsy少英
#include
int main()
printf("%f\n",s);
return 0;
} //該程式已在vs中除錯通過，望採納！
13樓：匿名使用者
/*輸入數值n:10
0.645635
press any key to continue*/#include
int main()
printf("%lf\n",sum);
return 0;}
14樓：流星不死
# include
int main()
printf("\n\n sum is %f",sum);
return 0;}
編寫程式,輸入n的值,求 :1-1/2+1/3-1/4+1/5-1/6+1/7-...+1/n
15樓：歲月哪曾斑駁
#include
int main ()
printf("%.4lf\n",sum);
return 0;}
計算s=1-1/2+1/3-1/4+1/5-……的近似值，直到最後一項的絕對值小於10的付6次
16樓：匿名使用者
#include
int main()
printf_s("\n所求的近似值為:%5.4f\n\n",s);}
1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9+......+1/100
17樓：夢色十年
1/2+1/3+1/4+1/5+1/6+1/7+1/8+1/9+......+1/100≈ln100+c（c=0.57722......）。
這是1/n求和，沒有公式計算的。自然數的倒陣列成的數列，稱為調和數列。人們已經研究它幾百年了。但是迄2023年為止沒有能得到它的求和公式，只是得到它的近似公式(當n很大時)：
1+1/2+1/3+......+1/n≈lnn+c(c=0.57722......一個無理數，稱作尤拉初始，專為調和級數所用)。
擴充套件資料
分數加減法
1、同分母分數相加減，分母不變，即分數單位不變，分子相加減，能約分的要約分。
2、異分母分數相加減，先通分，即運用分數的基本性質將異分母分數轉化為同分母分數，改變其分數單位而大小不變，再按同分母分數相加減法去計算，最後能約分的要約分。
乘除法1、分數乘整數，分母不變，分子乘整數，最後能約分的要約分。
2、分數乘分數，用分子乘分子，用分母乘分母，最後能約分的要約分。
3、分數除以整數，分母不變，如果分子是整數的倍數，則用分子除以整數，最後能約分的要約分。
4、分數除以整數，分母不變，如果分子不是整數的倍數，則用這個分數乘這個整數的倒數，最後能約分的要約分。
5、分數除以分數，等於被除數乘除數的倒數，最後能約分的要約分。
18樓：卍周杰倫
這是1/n求和，沒有公式計算的
自然數的倒陣列成的數列,稱為調和數列.人們已經研究它幾百年了.但是迄今為止沒有能得到它的求和公式只是得到它的近似公式(當n很大時):
1+1/2+1/3+......+1/n≈lnn+c(c=0.57722......一個無理數,稱作尤拉初始,專為調和級數所用)
人們傾向於認為它沒有一個簡潔的求和公式.
但是,不是因為它是發散的,才沒有求和公式.相反的,例如等差數列是發散的,公比的絕對值大於1的等比數列也是發散的,它們都有求和公式.
19樓：令黃蜂
這是用程式計算的**
const n=100;
var i:longint;
s:extended;
begin
;s:=0;
for i:=1 to n do
s:=s+1/i;
writeln(s);
readln
end.
抱歉看錯了，首項是1/2，我的sn再減1就可以啦
20樓：匿名使用者
不行的，這個算不出，除非用電腦裡的程式算。
到大學裡你會知道這隻能給出一個大致的範圍。
我只是說些我的看法。。如果你能算那是出來最好的
21樓：匿名使用者
syms n ;
>> symsum(1/n,n,2,100)ans =
>> 11677821270331852073640165685691639305439/2788815009188499086581352357412492142272
ans =
4.1874
這是用matlab做的，哈哈
基本沒有簡便的運算過程
提一下，這和尤拉常數有關。。。。
22樓：匿名使用者
這是用程式計算
的**：
#include "stdafx.h"
int main()
printf("和為%f\n",sum);
return 0;}
23樓：寒霜之翼
調和級數 最多給你個範圍 其他就。。。
大家幫幫忙，請大家幫幫忙
規定了原點，正方向和單位長度的直線叫數軸 規定了唯一的原點 origin 唯一的正方向和唯一的單位長度的直線叫數軸 胎兒已經不發育了，還怎麼幫忙啊。雖然很同情你們，但是沒有辦法，胎兒停止發育等於不會生長了。就是已經不能活了。所以還是。找個好醫院負責任的大夫 月子好好做。應該沒問題的。乙肝要做到 來完...
大家幫幫忙，翻譯，請大家幫幫忙翻譯，謝謝！
當我們度假的時候，我給我家人和朋友照了許多相片.但是這兒也有許多新聞 在我們度假的時候，我拍了許多家人和朋友的 但也有些 是為了用於新聞，網路和電視節目而拍攝的，這些 被稱為藝術照，因為這些體現了藝術美，像一幅風景畫。最初的藝術照是黑白的，如上面這張 由安塞爾 亞當斯在1942年拍攝，今天大部分的藝...
電腦升級！大家幫幫忙，電腦升級,大家幫幫忙
你這cpu是am2插槽的吧？直接換個新的比較好。多少價位你能接受？給你推薦個配置 舊電腦，升級配件不平行。效能更不要說是浪費金錢。例如 你改變的牛x一點的圖形cpu和沒有足夠的力量，你可能要更改一個新的主機板，cpu，主機板的，舊的記憶體用不上你有新的，您可以更改主機板顯示卡cpu，你必須改變一個大...