Pascal陣列遞推

2021-07-04 18:57:53 字數 626 閱讀 7510

有乙個養鴨專業戶,趕了一大群鴨子出去賣。他每經過乙個村莊,賣出所趕鴨子的一半再多乙隻,這樣他經過七個村莊後,還剩下兩隻鴨子,程式設計列印輸出他每經過乙個村莊後賣出多少只鴨子?剩下多少只鴨子?

var

a:array[0..7] of longint;

i:longint;

begin

a[7] := 2;

for i := 7 downto 1 do a[i-1] := 2*(a[i]+1);

for i := 1 to 7 do writeln('no.',i,' : ',a[i-1]-a[i]:5,a[i]:5);

end.

我點評一下,陣列遞推我估計在寫法上應該難度不大,唯獨乙個可能比較難想的是,賣出的數量是賣之前數量的一半多乙個,算了,列個**

賣之前賣出

賣之後n

1/2*(n)+1

1/2*(n)-1

2*n+1

管他那!

n...

......

把n代換為2*n+1,賣之後的數量就會變成n,這一步,估計數學底子不好的同學要想不通了~

所以賣之前的數量是賣之後數量的2*n+1,這就是我們陣列遞推的依據!

樹狀陣列 Pascal山脈

小卡卡順著老者所指的方向,來到了pascal神峰的頂峰。老者告訴小卡卡,pascal山脈有很多座山,都排在一條直線上,每座山都有不同的高度。pascal山的山頂有乙個神奇的洞穴,進入這個洞穴後,你將會到達這座山前方的另一座山,更加神奇的是,你到達的山一定比他所在的山高度要小。而pascal聖地最大的...

Pascal陣列,字串

已經兩天沒和大家見面了,今天我們來學習pascal語言和演算法三大風水寶地之一的陣列 三大風水寶地有 1.迴圈 2.陣列,字串 3.遞迴 我們來看看一維陣列的原理 陣列的定義是 a 隨意改 array 1.10000 隨意改 of longint 隨意改 一維陣列就是把數存入a 1 a 2 a 3 ...

Pascal語言簡介

首先,我使用的教材是西安電子科技大學第三版的 計算機作業系統 教材中使用的程式語言是pascal語言,就pascal語言做一簡單介紹,方便大家看這本書裡的對問題的描述時暢通無阻。很詳細的。下面,開始我們的主題了 一 pascal程式結構和基本語法 1 pascal程式由三部分組成,程式首部 說明部分...