正文內容

遼師大版信息技術九年《函數與過程》1-文庫吧

2025-10-25 00:17 本頁面

【正文】 n1,n2,n3三個數中的最大數 t1。第二次調用這個函數求出 t1與 n4,n5三個數中的最大數，也就是前三個數的最大數 (已在 t1中 )和后面二個數再求一次，就得到五個數的最大數。 Program Exam1_b。 Var n1,n2,n3,n4,n5,t1: integer。 Function max(x1,x2,x3: integer): integer。｛自定義函數 Max｝ Var xx: integer。｛函數內部變量說明｝ Begin ｛函數體｝ if x1＞ x2 then xx:＝ x1 else xx:＝ x2。 if x3＞ xx then xx:＝ x3。 max:＝ xx End。 Begin ｛主程序｝ write(39。Input 5 numbers:39。)。 readln(n1,n2,n3,n4,n5)。｛輸入五個數｝ t1:＝ max(n1,n2,n3)。｛用函數求 n1, n2, n3的最大數｝ t1:＝ max(n4,n5,t1)。｛用函數求 n4, n5, t1 的最大數｝ writeln(39。Max number :39。, t1)。 End. 例 2:編寫一個求組合數的函數 ,計算公式為 (0nm) C n m m! n! (mn)! Program Exam2。 Var m,n,cmn : integer。 Function fac(k : integer) : integer。 Var i, t : integer。 Begin t:=1。 f

點擊復制文檔內容

教學課件相關推薦

遼師大版信息技術九年《函數與過程》1-文庫吧

遼師大版信息技術六上第1課遨游logo王國-資料下載頁

遼師大版信息技術八下遮罩層動畫-資料下載頁

蘇科版初中信息技術上冊信息與信息技術1-資料下載頁

遼師大版信息技術八下acdsee看圖軟件-資料下載頁

遼師大版信息技術七上qq即時通信與郵件ppt課件-資料下載頁

遼師大版信息技術三上第5課認識鍵盤-資料下載頁

遼師大版信息技術八下制作音樂mtv動畫-資料下載頁

遼師大版信息技術七上無處不在的信息－信息的概念-資料下載頁

遼師大版信息技術七上控制面板ppt課件-資料下載頁

遼師大版信息技術七上系統多媒體設置ppt課件-資料下載頁

遼師大版信息技術四上第3課認識windows-資料下載頁

遼師大版信息技術七下初步體驗影片制作過程word教案-資料下載頁

遼師大版信息技術四上第1課認識新朋友1-資料下載頁

遼師大版五年級上冊信息技術教案-資料下載頁

蘇科版信息技術選修第9課定義過程課件1-資料下載頁

遼師大版信息技術九年函數與過程1-wenkub

遼師大版信息技術九年函數與過程1(已修改)

遼師大版信息技術九年函數與過程1(編輯修改稿)

遼師大版信息技術九年函數與過程1-wenkub.com

遼師大版信息技術九年函數與過程1(已改無錯字)