pascal語言求Sn a aa aaaaa aaa 有n個a 之值,其中a是數字,a等於2。n由鍵盤輸入

時間 2021-07-01 01:15:21

1樓:匿名使用者

varnum : array[0..10000] of integer;

n,i : longint;

begin

readln(n);

for i := n downto 1 do

num[i] := 2*i;

for i := n downto 1 do

begin

if num[i] >= 10 then

begin

num[i-1] := num[i] div 10 + num[i-1];

num[i] := num[i] mod 10;

end;

end;

for i := 0 to n do

begin

if (i>0) then

write(num[i])

else if num[i] <> 0 then write(num[i]);

end;

writeln;

end.

此程式已過編譯,已經是高精度的做法了,大資料秒出。

2樓:藝人大

可能是鍵盤進水了,用乾毛巾擦一下或者是放到太陽下晒,,,,,

3樓:匿名使用者

uses math;

var n,s:longint;

begin

readln(n);

s:=0;

for i:=1 to n do

s:=s+2*power(10,n+1-i)*i;

writeln(s);

end.

c語言作業。求sn=a+aa+aaa+……+aaa…a(n個a)之值,其中a是一個數字,n表示a的

4樓:最終幻夜

#include

int main() {

int n,temp,i,sum=0,a;

scanf("%d %d",&n,&a);

temp=a;

for(i=0; i

您好   不知道這樣是否滿足您的 需求  望採納

5樓:匿名使用者

#include

int main(void)

printf("結果=%d\n",sn);

return 0;}

c語言編寫:求sn=a+aa+aaa+…+aa…a n個a之值

6樓:匿名使用者

這個計算是錯的吧,是a+aa+aaa+...+aaaaaa所以可以做如下修改:

#include

#include

int main()

printf("sn=%d",sn);

return 0;}

7樓:匿名使用者

for (m = 0, sn = 0; m < n /*更簡便*/; m++)

sn = sn * 10 + a;

求sn=a+aa+aaa+……+aa…a(n個a)之值,其中a是一個數字,n表示a的位數 。用c語言怎樣程式設計

8樓:匿名使用者

#include

int main(int argc, char *argv)else//以後的都滿足關係:這個數

等於前一個數*10+a

}printf("%d",sum);//輸出總和return 0;

9樓:匿名使用者

^首先,an=a*111…1=a/9*999…9=a/9*(10^n-1)。所以,sn=a/9*(10-1+10^2-1+…+10^n-1)=a/9*(1+10+10^2+…+10^n-n-1)=a/9*((10^(n+1)-1)/9-n-1)。

剩下用c程式設計好了。用迴圈是最笨的辦法。

10樓:三石

舉個例子吧,2222就等於(10000-1)/9*2,在用個累加就行了,思路是這樣,

11樓:匿名使用者

#include

void main()

printf("s=%ld\n",s);}

c語言編寫:求sn=a+aa+aaa+…+aa…a n個a之值

12樓:匿名使用者

l#include "stdio.h"

int main()

printf(" = %ld",sum);

return 0;

}樓上的解答不對

13樓:樂觀的志

看了一下樓上的**,在樓上的基礎上改進了一下,比樓上的簡便一些。希望可以幫到你們。(int可以改為long)

#include

main()

printf("值的結果是:%d\n",sum);

return 0;}

14樓:匿名使用者

你用的是tc還是vc?我這裡給你個tc環境的,供你參考一下。

#include "stdio.h"

int main()

printf(" = %ld",sum);

return 0;

}這好像有一種演算法,但是我也不知道具體的。我也是菜鳥一個,希望能幫到你。

一道c語言迴圈題s=a+aa+aaa+…+aa…a(n個a)之值,其中a是一個數字,n代表a的位數

15樓:匿名使用者

#include

void main()

printf("sn=%d",s);}

16樓:匿名使用者

int result;

for(int i=0;i0;j--)

result+=temp;}

c語言程式設計編寫一程式, 求sn= a+aa+aaa+…+aaa…aaa(n個a)的值,其中a是 1~9之間的一個數字............

17樓:孤獨的落葉

#include

// n+1 代表的是位數,從0開始,即n=0代表一位int getvalue(int a, int n)return temp;

}int main()

cout << result << endl;

return 0;

}注意:自己替換一下輸入輸出!c語言的輸入輸出比較麻煩所以,就換成了c++的寫法!總體的演算法不變

pascal語言程式設計,什麼是pascal語言程式

太麻煩,懶得。其實簡單的迴圈就ok了。program ex var j,k integer beginfor j 0 to 25 do beginfor k j to j do write chr 65 abs k writeln end end.1層的果然是厲害,你是參加四月的pascal程式設計...

懂pascal語言的來

300 ord ord pred a 300 2 10 and odd ord succ b 300 ord ord a 1 300 2 10 and odd ord c 300 ord 96 300 2 10 and odd 99 300 ord 198 10 and odd 99 300 ord...

求兩個數最大公約數pascal語言

你好 hvar a,b,c longint begin write a,b readln a,b while b 0 do begin c a mod b a b b c endwrite a end.這是用while語句的。 羅不理 var a,b,c,d integer 定義四個變數 begin...