遼師大版信息技術(shù)九年函數(shù)與過程1-wenkub.com
2025-11-14 00:17 本頁面
【正文】 writeln(x,y)。 y:=temp。 Procedure swap (x, y:integer)。 writeln(x,u)。 y:=y+1。 Var x,u: integer。 全局量： 主程序的說明部分中說明的量。 y:=1。 Begin x:=2。 end. end. 1 2 1 2 1 2 2 1 分析該程序，寫出運行結(jié)果 Program ex3。 swap(a,b)。 a:=1。 end。y:=t。 var t:integer。 var a,b:integer。利用變量參數(shù)可以送回過程運算的結(jié)果。 if b＞ c fhen swap (b,c)。 Begin {主程序 } write(‘input a,b,c=’)。 {自定義過程 } Var t:integer。 注意：過程的結(jié)果由參數(shù)送回，可以包括多個 ?過程調(diào)用的一般格式： 過程名 (實在參數(shù)表 ) 例 3:輸入三個不同的整數(shù) ,按由小到大排序 。 if (n=0) and (nm) then begin cmn:= fac(m) div (fac(n)*fac(mn))。 fac:=t。 Function fac(k : integer) : integer。Max number :39。 readln(n1,n2,n3,n4,n5)。 max:＝ xx End。 Function max(x1,x2,x3: integer): integer。第一次用這個函數(shù)求出n1,n2,n3三個數(shù)中的最大數(shù) t1。 t1 := max(t1,n4)。
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1