Bµi 17 Gi¸o ¸n ®iÖn tö tin häc líp 11 VD1: Lập chơng trình tính tổng luỹ thừa S = a m +b n +c p +d q VD1: Lập chơng trình tính tổng luỹ thừa S = a m +b n +c p +d q Viết chơng trình con dạng tổng quát Luythua = x k Trong đó : Luythua, x kiểu thực, k kiểu nguyên. Khi tính luỹ thừa của các số hạng trong tổng trên ta chỉ cần gọi tên ch ơng trình con Luythua và thay thế (x,k) bằng các giá trị tơng ứng. Ví dụ nh: Luythua(a,m). luythua(b,n), luythua(c,p),luythua(d,q). * INPUT : Các cơ số a,b,c,d và các số mũ lần lợt n,m,p,q * OUTPUT : S Program tong_luy_thua; Uses crt; Var a,b,c,d,S : real; n,m,p,q :integer; Function luythua(x: real,k:integer): real; Var j: integer; Lt:Real; begin Lt:=1; For j:=1 to k do Lt:=Lt*x; Luythua:=Lt; end; BEGIN Write(‘ Nhap vao cac co so a,b,c,d ‘); readln(a,b,c,d); write(‘ Nhap vao cac so mu m,n,p,q: ’); readln(n,m,p,q); s:= luythua(a,m)+luythua(b,n)+luythua(c,p)+luythua(d,q); Writeln(‘ Tong luy thua =’, S:7:2); Readln; END. Biến đợc khai báo ở trong CTC chỉ có tác dụng trong CTC gọi là biến cục bộ. Biến khai báo ở CT chính có tác dụng ở mọi chơng trình gọi là biến toàn bộ. Biến đợc khai báo cho dữ liệu vào/ra ở CTC gọi là tham số hình thức. Biến chứa trong lời gọi CTC ở chơng trình chính là các tham số thực sự. Ví dụ 2: Lập chơng trình vẽ các hình chữ nhật bằng dấu * có kích thớc khác nhau. Ví dụ 2: Lập chơng trình vẽ các hình chữ nhật bằng dấu * có kích thớc khác nhau. Theo bạn để viết chơng trình cho ví dụ trên ta nên dùng loại chơng trình con nào? Dùng chơng trình con thủ tục Ve_HCN(dai,rong) để vẽ một hình chữ nhật. Trong chơng trình chính, dùng lời gọi thủ tục và truyền các tham số với giá trị khác nhau để vẽ các hình chữ nhật khác. Ví dụ: Ve_HCN(25,20); Ve_HCN(3,7) C¸c em h·y viÕt mét thñ tôc Ve_HCN b»ng dÊu * víi chiÒu dµi, réng bÊt k×! ********************************** * * * * * * ********************************** Dµi Réng  VÏ c¹nh trªn cña HCN  VÏ hai c¹nh bªn  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( * ); WRITELN;‘ ’ Program VD; Uses crt; var a,b: byte; Procedure Ve_HCN( chdai,chrong:integer); Var i,j: 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(‘ * ’); writeln; end; BEGIN CLRSCR; Ve_HCN(25,10); Writeln; a:=5 ; b:=10; Ve_HCN(a,b); readln; END. BiÕn côc bé Tham sè thùc sù (tham trÞ) Tham sè h×nh thøc BiÕn toµn côc Program VD; Uses crt; var a,b: integer; Procedure Hoan_doi(Var x,y:integer); Var TG: integer; Begin TG:= x; 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. BiÕn côc bé Tham sè thùc sù (tham biÕn) Tham sè h×nh thøc BiÕn toµn côc Hãy nhớ! Biến: Tham số - 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 bộ. - Biến khai báo cho dữ liệu vào ra trong chơng trình con gọi là tham số hình thức. - Biến chứa trong lời gọi CTC ở chơng trình chính là các tham số thực sự. . côc bé Tham sè thùc sù (tham biÕn) Tham sè h×nh thøc BiÕn toµn côc Hãy nhớ! Biến: Tham số - 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. là tham số hình thức. Biến chứa trong lời gọi CTC ở chơng trình chính là các tham số thực sự. Ví dụ 2: Lập chơng trình vẽ các hình chữ nhật bằng dấu * có kích thớc khác nhau. Ví dụ 2: . =’, S:7 :2) ; Readln; END. Biến đợc khai báo ở trong CTC chỉ có tác dụng trong CTC gọi là biến cục bộ. Biến khai báo ở CT chính có tác dụng ở mọi chơng trình gọi là biến toàn bộ. Biến đợc