遼師大版信息技術九年函數與過程1-文庫吧在線文庫
【正文】 定義函數 Max｝ Var xx: integer。 t1 := max(t1,n5)。 Begin If x1x2 then max := x1 else max := x2。 BEGIN 函數體 END。 ② 將 t1與 n2比較，將兩者中較大的數放入 t1； ③將 t1與 n3比較，將兩者中較大的數放入 t1； ④將 t1與 n4比較，將兩者中較大的數放入 t1； ⑤將 t1與 n5比較，將兩者中較大的數放入 t1； ⑥經過以上 5步處理后， t1即為 5個數中最大者。 readln(n1,n2,n3,n4,n5)。第一次用這個函數求出n1,n2,n3三個數中的最大數 t1。 max:＝ xx End。Max number :39。 fac:=t。 注意：過程的結果由參數送回，可以包括多個 ?過程調用的一般格式： 過程名 (實在參數表 ) 例 3:輸入三個不同的整數 ,按由小到大排序 。 Begin {主程序 } write(‘input a,b,c=’)。利用變量參數可以送回過程運算的結果。 var t:integer。 end。 swap(a,b)。 Begin x:=2。 全局量： 主程序的說明部分中說明的量。 y:=y+1。 Procedure swap (x, y:integer)。 writeln(x,y)。 y:=temp。 writeln(x,u)。 Var x,u: integer。 y:=1。 end. end. 1 2 1 2 1 2 2 1 分析該程序，寫出運行結果 Program ex3。
教學課件相關推薦
鄂ICP備17016276號-1