國際象棋棋盤上的麥粒

1、1國際象棋棋盤上的麥粒1、實踐目標（1）理解循環(huán)語句的作用，能根據(jù)實際情況正確使用F語句。（2）學(xué)會使用VB循環(huán)控制結(jié)構(gòu)編寫程序，實現(xiàn)簡單的算法。2、任務(wù)描述在印度有一個古老的傳說：舍罕王打算獎賞國際象棋的發(fā)明人——宰相西薩班達依爾。國王問他想要什么。他對國王說：陛下，請您在這張棋盤（圖71）的第1個小格里，賞給我1粒麥子，在第2個小格里給2粒，第3小格給4粒，以后每一小格都比前一小格加1倍。請您像這樣擺滿棋盤上所有64格的麥粒，都賞給

2、您的仆人吧！國王覺得這個要求太容易滿足了就命令給他這些麥粒。當人們把一袋一袋的麥子搬來開始計數(shù)時，國王才發(fā)現(xiàn)：就是把全印度甚至全世界的麥粒全拿來，也滿足不了那位宰相的要求。那么，宰相要求得到的麥粒到底有多少呢？嘗試設(shè)計一個程序來計算。3、操作提示（1）問題分析本問題可用累加的方法來求解，即最后得到的麥粒數(shù)由每一格賞賜的麥粒數(shù)相加得到，而且相鄰的格子要求得到賞賜的麥粒數(shù)也是有一定規(guī)律的，即后一格是前一覆蓋麥粒數(shù)的2倍。若用i表示當前所處的

3、格子，p表示此格子中應(yīng)該賞賜的麥粒數(shù)，s表示累加得到的麥粒數(shù)，分析過程見表71。3（3）程序?qū)崿F(xiàn)。①將下列根據(jù)上面算法編寫的代碼填寫完整。PrivateSubComm1_Click()DimnAsIntegeriAsIntegerpAsDoublesAsDoublen=Val(Text1.Text)s=0p=1Fi=Tons=p=NextiNY開始輸入棋盤上的格子數(shù)n累加得到的麥粒數(shù)置初值s←0當前格子的麥粒數(shù)置初值p←1置初值：i←1