Bài giảng Điện tử Tin học lớp 11: Bài 20

Chia sẻ: Le Ba Thanh | Ngày: | Loại File: PPT | Số trang:9

Thêm vào BST

Báo xấu

90
lượt xem 5
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Bài giảng Điện tử Tin học lớp 11 - Bài 20: Biến và tham số tập hợp một số ví dụ về biến và tham số có hướng dẫn cách thực hiện. Chúc các em học tốt.

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: Bài giảng Điện tử Tin học lớp 11: Bài 20

Bµi 20 Gi¸o ¸n ®iÖn tö tin häc líp 11
VD1: LËp ch¬ngtr×nhtÝnh tæng luü thõa S =am +bn+cp ng nh VD1: LËp ch¬ tr× tÝnh tæng luü thõa S =am + +bn cp +dq +dq * INPUT : C¸c c¬sè a,b,c,d vµ c¸c sè mò lÇn lît n,m,p,q * OUTPUT : S  ViÕt ch¬ tr× con d¹ng tæng qu¸t Luythua =xk ng nh 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¬ tr× con Luythua vµ thay thÕ (x,k) b»ng c¸c gi¸ trÞ t¬ ng nh ng øng. VÝ dô nh: Luythua(a,m). luythua(b,n), luythua(c,p),luythua(d,q).
Pro g ram to ng _luy_thua; Us e s c rt; Var a,b,c ,d,S : re al; n,m,p,q :inte g e r; Func tio n luythua(x: re al,k:inte g e r): re al; Var j: inte g e r; Lt:Re al; be g in Lt:=1; Fo r j:=1 to k do Lt:=Lt*x; Luythua:=Lt; e nd; BEGIN Write (‘ Nhap vao c ac c o s o a,b,c ,d ‘); re adln(a,b,c ,d); write (‘ Nhap vao c ac s o mu m,n,p,q: ’); re adln(n,m,p,q); s := luythua(a,m)+luythua(b,n)+luythua(c ,p)+luythua(d,q); Write ln(‘ To ng luy thua =’, S :7:2); Re adln; END.
• BiÕn khai b¸o ë CT c hÝnh c ã t¸c dô ng ë mäi c h¬ng tr×nh g äi lµ biÕn to µn bé . • BiÕn ®îc khai b¸o ë tro ng CTC c hØ c ã t¸c dô ng tro ng CTC g äi lµ biÕn c ô c bé . • BiÕn ®îc khai b¸o c ho d÷ liÖu vµo /ra ë CTC g äi lµ tham s è h×nh thø c . • BiÕn c hø a tro ng lê i g äi CTC ë c h¬ng tr×nh c hÝnh lµ c ¸c tham s è thùc s ù.
VÝ dô 2: LËp ch¬ ngtr× nh vÏ c¸c h× nh ch÷ nhËt b»ng dÊu **cã kÝch thíc VÝ dô 2: LËp ch¬ tr× vÏ c¸c h× ch÷ nhËt b»ng dÊu cã kÝch thíc ng nh nh kh¸c nhau. kh¸c nhau. The o b ¹n ®Ó  Dïng ch¬ng tr×nh con thñ tôc v iÕt c h¬ng tr×nh c ho v Ý d ô trª n ta Ve_HCN(dai,rong) ®Ó vÏ mét nª n d ïng lo ¹i c h h× ch÷nhËt. nh ¬ng tr×nh c o n nµo ?  Trong ch¬ tr× chÝnh, dïng ng nh 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× ch÷nhËt kh¸c. nh VÝ dô: Ve_HCN(25,20); Ve_HCN(3,7)
C¸c e m h·y v iÕt Dµi m é t thñ tô c Ve _HCN b »ng ********************************** * * d Êu * v íi c hiÒu * * Ré ng d µi, ré ng b Êt k×! * * **********************************  VÏ c¹nh trªn cña HCN FOR i:= to chdai DO WRITE(‘*’); WRITELN; 1  VÏ hai c¹nh bªn FOR J := to chrong -2 DO 1 Begin Write(‘*’); For i:= to chdai - 2 do Write(‘ ‘); 1 Writeln(‘*’) end;  VÏ c¹nh díi FOR i:= to chdai DO WRITE(‘*’); WRITELN; 1
Pro g ram VD; BiÕn toµn côc BiÕn côc bé Us e s c rt; var a,b: byte ; Pro c e dure Ve _HCN( c hdai,c hro ng :inte g e r); Var i,j: inte g e r; Be g in Fo r i:=1 to c hdai do write (‘ * ’); Tham sè h×nh Write ln; thøc Fo r j:=1 to c hro ng 2 do be g in write (‘ * ’); fo r i:=1 to c hdai2 do write (‘ ‘); write ln(‘ * ’); e nd; Fo r i:=1 to c hdai Do write (‘ * ’); write ln; e nd; Tham sè thùc sù (tham BEGIN trÞ) CLRS CR; Ve _HCN(25,10); Write ln; a:=5 ; b:=10; Ve _HCN(a,b); re adln; END.
Pro g ram VD; BiÕn toµn côc Us e s c rt; BiÕn côc bé var a,b: inte g e r; Tham sè h×nh thøc Pro c e dure Ho an_do i(Var x,y:inte g e r); Var TG: inte g e r; Be g in TG:= x; x:= y; y:=TG; e nd; BEGIN CLRS CR; Tham sè thùc sù (tham a:= 5 ; b:= 10; biÕn) Write ln( a:6 , b:6); Ho an_do i(a,b); Writeln( a:6 , b:6); re adln; END.
H·y nhí!  BiÕn: Khai b¸o trong c h¬ng tr×nh c hÝnh lµ biÕn toµn c ôc . Khai b¸o trong c h¬ng tr×nh c on lµ biÕn c ôc bé .  Tham s è BiÕn khai b¸o c ho d÷ liÖu vµo ra trong c h¬ng tr×nh c on gäi lµ tham s è h×nh thøc . BiÕn chøa trong lê i gäi CTC ë c h¬ng tr×nh c hÝnh lµ c ¸c tham s è thùc s ù.