Pascal 簡單題 無比順利

2021-07-27 07:03:35 字數 753 閱讀 6769

時間限制: 1 sec  

記憶體限制: 128 mb

中國人非常喜歡

6這個數字,因為大家總愛說

66大順啊。數學狂人葉某人喜歡把什麼都數位化,於是她把順利這個詞也定義了數量級,6代表

1級順利,

66代表

2級順利,

666代表

3級順利,以此類推。你看,數學狂人的世界總是讓人無法理解。今天,葉某人決定將數學進行到底,現在她設前

n級順利的和是sn。

sn=6+66+666+...+66..66(n個6)

。 假設你已經知道了數字

n,那麼,你能幫葉某人求出

sn麼?

輸入乙個數n,

n不會超過10。

輸出sn

的值

2
72

--

這道題我用的方法是:首先用乙個迴圈,然後把所有的6加上,再把所有的60加上……以此類推

簡單的模擬~寫了4分鐘,一次搞定(oj)不編譯

var ans,n,i,j,bb:longint;

begin

readln(n);

for i:=1 to n do

begin

bb:=1;

for j:=1 to i do

bb:=bb*10;

ans:=ans+(n-i+1)*6*(bb div 10);

end;

writeln(ans);

end.

Pascal 簡單題 兔子繁殖問題

沒事刷水題聽說對身體有益 已知有一對兔子,每個月可以生一對兔子,而小兔子乙個月後又可以生一對小兔子 比如 2月份出生的小兔子 4月份可以生育 既兔子的對數為 第乙個月 1對,第二個月 2對,第三個月 3對,第四個月5對 假設兔子的生育期為兩年,且不死。那麼問題來了,你能說出每個月的兔子數麼?輸入乙個...

水題)簡單題

problem 2183 簡單題 現在有一些被簡單壓縮的字串,例如 a 120 代表120個a。對於字串acb 3 d 5 e相對於acbbbddddde 現在給你兩個字串cstring,nstring.乙個是被壓縮過的字串,另乙個沒有被壓縮。求nstring是否為cstring的子串,如果是輸出t...

簡單搜尋題!

設有乙個4 4的棋盤,用四個棋子布到格仔中,要求滿足以下條件 1 任意兩個棋子不在同一行和同一列上 試問有多少種棋局,程式設計把它們全部列印出來。如下 include include include include include using namespace std int n 4,m 4,us...