Pascal選擇結構練習

2022-05-09 02:15:04 字數 1352 閱讀 9711

1.由鍵盤讀入乙個數,輸出其絕對值。

2.由鍵盤讀入兩個數,對其由小到大排序輸出。

3.輸入兩個數a,b,輸出較大數的平方值。

4.判斷讀入的數是奇數還是偶數,如果是奇數輸出「ji」,偶數輸出「ou」,不能用odd()函式;

5.從鍵盤讀入3個數到實型變數x,y,z中,輸出其中的最大數。

6.輸入a,b,c三個不同的數,將它們按由小到大的順序輸出。

7.從鍵盤讀入乙個分數到實型變數s中,大於等於85分輸出「you」,大於等於75分輸出「liang」,小於75分輸出「cha」,其它輸出「error」。

8.給出以百分制成績(整型資料),要求輸出成績等級'a','b','c','d','e'。

90分以上為『a』,80~ 89分為『b』,

70~79分為『c』,60~69分為『d』,

60分以下為『e』。

9.有乙個函式:

當x<1時y=x,

當1<=x<10時y=2x-1,

當x>=10時y=3x-11,

寫乙個程式,輸入x,輸出y值。

10.給乙個不多於5位的正整數,要求輸出它是幾位數,並逆序列印各位數字,例如:

讀入的數字為:321

輸出: 3

1 2 3

11.讀入乙個年份,輸出是否是閏年。(閏年的判定是,表示該年的數字能被4整除

不能被100整除,或者能被400整除的數都是閏年。)

12.某超市為了**,規定:購物不足50元的按原價付款,超過50不足100的按九折付款,超過100元的,超過部分按八折付款。

編一程式完成超市的自動計費的工作。

13.火車託運行李問題,行李重量在50kg以下的,每公斤收費是0.35元,總重量超

過50公斤的,超過部分以每公斤0.50元收費。

程式設計:輸入行李重量,自動輸出收費總額。(注意實數場寬輸出格式)

14.輸入年月,輸出本月有幾天?(分別用if語句和case語句程式設計計算)(參考程式)

分析:不管是哪一年月都是31天,

都是30天,只有2月份,才考慮是否閏年。

閏年年份能夠被4整除,但不能被100整除,或者能夠被400整除。

15.運輸費用的計算,距離愈遠,每公里運價愈低。

s<250(公里),折扣=0%;

250<=s<500, 折扣=2%;

500<=s<1000, 折扣=5%;

1000<=s<2000, 折扣=8%;

2000<=s<3000, 折扣=10%;

3000<=s, 折扣=15%;

設每公里每噸運價為p,重量為w,折扣為d,運費f應為:

f=p*w*s*(1-d)

p為常量2,重量w從鍵盤讀入,計算f並輸出。

pascal選擇迴圈結構練習

選擇結構 1.程式清單 program lx1 vara integer begin readln a if a mod 2 0 then writeln a,oushu else writeln a,jishu end.輸入 1288 後,輸出結果為 2.程式清單 program lx2 varx...

PASCAL08 迴圈結構

迴圈結構的程式設計 一 簡單計數迴圈 for迴圈 引入 在解題的時候經常會遇到需要重複處理一類相同的事或類似的操作,如求1 2 3 4 100的和,就需要重複地做加法運算。這就是我們在前面提過的的迴圈結構,它的n s圖有兩種 當型迴圈 或計數迴圈直到型迴圈 其中 重複做的事 操作 一條或多條語句 稱...

1 2流程圖 選擇結構練習

1.2.2流程圖 選擇結構 反饋練習 1 如果考生的成績大於或等於 分,則輸出 及格 否則輸出 不及格 用流程圖表示這一演算法過程。2 如圖所示的程式框圖能判斷任意輸入的正整數的奇偶性,其中判斷框內的條件是3 寫出解方程 為常數 的演算法,並畫出流程圖 4 下面的流程圖表示了乙個怎樣的演算法?課後作...