1樓:網友
程式中多處有誤,修改如下:
clear all
cleardime a(30)
for i=1 to 30
a(i)=int(rand(i)*1000)? a(i)
next wait"是否顯示個位比十位小2的數(y/n):"to yn
if uppe (yn)="y"
for i=1 to 30
c=int(a(i)/10)%10 &&c是十位數。
b=a(i)%10 &&b是個位數。
if c=b+2
a(i)endifnext
endifwait "是否將30個數從大到小排列並求出最大最小數(y/n):"to yn
if uppe (yn)="y"
for i=1 to 29
for j=i+1 to 30
if a(i)>a(j)
t=a(i)
a(i)=a(j)
a(j)=t
endifendfor
endfor
for i=1 to 30
a(i)next a(1),a(30)
endifwait "是否計算最小數的價乘(y/n):"to ynif uppe (yn)="y"
jie=1for i=1 to a(1)
jie=jie*i
next jie
endifwait "是否計算奇數和及偶數和(y/n):"to ynif uppe (yn)="y"
s1=0 s2=0
for i=1 to 30
if a(i)/2=int(a(i)/2)s2=s2+a(i)
else s1=s1+a(i)
endifnext
s1,s2endifwait "是否計算水仙花數(y/n):"to ynif uppe (yn)="y"
for i=1 to 30
b=int(i/100)
s=int(mod(1,100)/10)
g=mod(1,100)
if b**3+s**3+g**3=i
i endif
next endif
wait "是否求出素數(y/n):"to ynif uppe (yn)="y"
for i=2 to 30
for j=2 to i/2+1
if mod (i,j)=0
exitendif
next if j>=i/2+1
i endif
endfor
endifset talk on
cancel
2樓:網友
這是做什麼功能的。
for 結束用錯了吧。
和男朋友鬧分手後來知道錯了我不知道怎麼回他他就說祝我幸福我現在該怎麼回他
回他一句 笨蛋,明明喜歡他,就要把握住,分手也別經常鬧 去找他見面說吧,聊點日常,然後滑出句我們還是繼續吧,然後看他怎麼說 你男朋友沒給過你安全感嗎 沒有你,我能幸福麼?跟男朋友分手後,他對我說祝我幸福,這是為什麼?是我提出來的 如果邇真的在乎的話 邇就會盡自己最大的努力去行動 而不是無謂的從嘴裡蹦...
不知道北帝是那朝皇帝
北帝不是哪個朝代的皇帝。北帝是中國民間信仰的神仙之一。其為統理北方 統領所有水族 故兼水神 之道教神祇。南方人拜北帝,是因為南方的水,由北方流來。廣東人依水謀生,靠水搵食,所以既拜南海洪聖大王 赤帝 又拜北方真武玄天上帝 黑帝 北帝位於水源之上,祭祀他,希望他控制水源,好好地流到南方,一怕無,二怕多...
和朋友絕交了,我不知道我做錯了什麼
你覺得跟自己喜歡的人挑明瞭後被拒絕,還有可能當朋友嗎?很不現實的 那也沒什麼,只是不想有一種不清不楚的感覺,斷了就斷了吧,因為異性很難做單純的朋友的。他有男朋友了,不想讓你傷心。可能她心裡還有你,說不定當初和你做朋友也是心裡暗暗藏著喜歡的,而不是隻有友情 想想自己與朋友的交往。我覺得你有點怎麼說呢,...