遼師大版信息技術九年函數與過程1(留存版)

　　

【正文】 2 1 分析該程序，寫出運行結果 Program ex3。 Var x,u: integer。 y:=temp。 Procedure swap (x, y:integer)。 全局量： 主程序的說明部分中說明的量。 swap(a,b)。 var t:integer。 Begin {主程序 } write(‘input a,b,c=’)。 fac:=t。 max:＝ xx End。 readln(n1,n2,n3,n4,n5)。 BEGIN 函數體 END。 t1 := max(t1,n5)。 ｛輸入五個數｝ t1:＝ max(n1,n2,n3)。 writeln(‘ c( ’,m, ‘,’,n, ‘)=’, cmn ) end else writeln(‘Input error!’) End. ?過程定義的一般格式 : PROCEDURE 過程名 (形式參數表 )。 writeln (a:6, b:6, c:6)。 t:=x。 Var x,y: integer。 Procedure change (x:integer。 writeln(x,y) End。 Var x,y: integer。 writeln (x,y) End. x u 1 1 2 2 1 2 變量的作用域： 局部量： 在子程序內部作用的變量 ， 局部變量的作用域就是其所在的子程序。 writeln(a:3,b:3)。 procedure swap(Var x,y:integer) 。 y:=t {交換兩個變量的值 } E