Bài 18 tuet 1

1. Chương trình con được chia ra làm mấy loại A. 1 loại B. 2 loại C. 3 loại D. 4 loại 2. Cấu trúc chung của chương trình con được chia làm mấy phần A. 1 phần B. 2 phần C. 3 phần D. 4 phần Hàm (Function) và thủ tục (Procedure) <Phần khai báo> <Phần thân> 3. Cấu trúc chung của chương trình chính được chia làm mấy phần A. 1 phần B. 2 phần C. 3 phần D. 4 phần [<Phần khai báo>] <Phần thân> [...]... cục Biến toàn Uses crt; Biến cục bộ var a,b: integer; Tham s giỏ tr Procedure Hoan_doi(x: integer; Var y:integer); Var TG: integer; Begin TG:= x; Tham s bin x:= y; y:=TG; end; BEGIN CLRSCR; a:= 5 ; b:= 10 ; Writeln( a:6 , b:6); Hoan_doi(a,b); Writeln( a:6 , b:6); readln; END Tham số thực sự Hãy nhớ! Biến: - Khai báo trong chương trình chính là biến toàn cục - Khai báo trong chương trình con là biến cục . * *’); 1. Cách viết và sử dụng thủ tục: Nếu có yêu cầu về vẽ nhiều hình chữ nhật như ở VD 1 thì sao? 1. Cách viết và sử dụng thủ tục: Ví dụ: Thủ tục vẽ hình chữ nhật Program VD_Thutuc1; Procedure. Vẽ cạnh dưới FOR i: =1 to chdai DO Write( * ); Writeln;’ ’ FOR j: =1 to chrong -2 DO Begin Write( * );’ ’ For i: =1 to chdai - 2 do Write( );’ ’ Writeln( * )’ ’ end; FOR i: =1 to chdai DO Write(. integer; Begin For i: =1 to chdai do write(’ * ’); Writeln; For j: =1 to chrong-2 do begin write(’ * ’); for i: =1 to chdai-2 do write(’ ’ ); writeln(’ * ’); end; For i: =1 to chdai Do write(’