Bai 17 Chuong trinh con va phan loai

<span class='text_page_counter'>(1)</span>CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. GIÁO VIÊN: NGỌC CHÂU.

<span class='text_page_counter'>(2)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI Khái niệm chương trình con Phân loại và cấu trúc của chương trình con. I. II.. a) b). Phân loại Cấu trúc chương trình con.

<span class='text_page_counter'>(3)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI Khái niệm chương trình con Phân loại và cấu trúc của chương trình con. I. II.. a). Phân loại.

<span class='text_page_counter'>(4)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. BÀI TOÁN:. Lập trình tính:. S= Ta có:. S1:= 1; For i:=1 to x do S1:= S1 * a; Tương tự..ta sẽ tính S2, S3, S4.

<span class='text_page_counter'>(5)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI Var a,b,c,d,x,y,z,t,i: integer;. CHƯƠNG TRÌNH:. S,S1,S2,S3,S4,S5, S6 : longint; BEGIN. Writeln(‘Nhap co so:’); readln(a,b,c,d); Writeln(‘Nhap so mu :’); readln(x,y,z,t);. S1:= 1; For i:=1 to x do S1:= S1 * a; S2:= 1; For i:=1 to y do S2:= S2 * b; S3:= 1; For i:=1 to z do S3:= S3 * c; S4:= 1; For i:=1 to t do S4:= S4 * d;. S:= S1 +S2 + S3 + S4 ; Writeln(‘Tong la S=‘, S) Readln END.. 5.

<span class='text_page_counter'>(6)</span> Bài Bài toán toán. S=. PROGAM baitoan1; Var a,b,c,d,e,f,x,y,z,t,m,n ,i: integer; S:longint;. Function LT(a,x:integer) : Longint; Var S1:Longint; i : integer;. Begin S1:= 1; For i:=1 to x do S1:= S1 * a; LT := S1; End; BEGIN Writeln(‘Nhap co so:’); readln(a,b,c,d); Writeln(‘Nhap so mu:’); readln(x,y,z,t); S:= LT(a,x) + LT(b,y) + LT(c,z)+ LT(d,t); Writeln(‘Tong la S=‘, S) Readln END.. CHƯƠNG TRÌNH CON.

<span class='text_page_counter'>(7)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. 1. Khái niệm:. Chương trình con là một dãy lệnh, mô tả một số thao tác nhất định và có thể được thực hiện (được gọi) từ nhiều vị trí trong chương trình chính..

<span class='text_page_counter'>(8)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI Lợi ích sử dụng chương trình con:. . Tránh việc lặp đi lặp lại cùng một dãy lệnh. . Hỗ trợ việc thực hiện các chương trình lớn. . Phục vụ quá trình trừu tượng hóa. . Mở rộng khả năng ngôn ngữ. . Thuận tiện cho phát triển, nâng cấp chương trình.

<span class='text_page_counter'>(9)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI 2. Phân loại chương trình con:. . Hãy kể tên các thủ tục vào ra chuẩn mà em biết? . readln(x). . read(x). . write(x). . Writeln(x).

<span class='text_page_counter'>(10)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. 2. Phân loại chương trình con:. •. Hãy phân loại hàm hay thủ tục cho các hàm/thủ tục sau:. •. sin(x). •. delete(s,vt,n) Thủ tục. •. readln(x). •. upcase(ch). •. write(x) Thủ tục copy(s,vt,n). •. Hàm. Thủ tục Hàm. Hàm.

<span class='text_page_counter'>(11)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. Chương ương tr×nh tr×nh con con Ch Hµm Hµm(Function) (Function). Thñ Thñtôc tôc(Procedure) (Procedure). Lµ Lµ ch chươ ương ng tr×nh tr×nh con con thùc thùc hiÖn hiÖn mét mét sè sè thao thao t¸c t¸cnµo nàođó, đó,và vµtr¶ tr¶vÒ vÒmét mét gi¸ gi¸trÞ trÞ qua quatªn tªncña cñanã. nã.. Lµ Lµ ch chươ ương ng tr×nh tr×nh con con thùc thùc hiÖn hiÖn mét mét sè sè thao thao t¸c t¸c nµo nµo đó, đó, và vµ kh«ng kh«ng tr¶ tr¶ vÒ vÒ gi¸ gi¸ trÞ trÞ nµo nµoqua quatªn tªncña cñanã. nã.. TÝnh tæng luü thõa S = an + bm + cp + dq. VÏ vµ ®a ra mµn h×nh 5 h×nh ch÷ nhËt cã kÝch thước kh¸c nhau..

<span class='text_page_counter'>(12)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. Ghi nhí!.  Chương tr×nh con lµ mét d·y lÖnh gi¶i quyÕt mét bµi to¸n con cô thÓ.  Ph©n lo¹i chương tr×nh con: + Hµm + Thñ tôc  CÊu tróc chương tr×nh gåm: <PhÇn khai khai b¸o> b¸o> <PhÇn PhÇn th©n> th©n> << PhÇn.

<span class='text_page_counter'>(13)</span> Phân loại chương trình con: <Phầnđầu> đầu> <Phần [<PhÇn khai khai b¸o>] b¸o>] [<PhÇn PhÇn th©n> th©n> << PhÇn Hµm (Function). Thñ tôc (Procedure). Function <Tªnhµm>[(<ds tham sè>)] :kiÓu cña. Procedure <tªn thñ tôc> [(<ds tham. hµm;. sè>)]; [< PhÇn khai b¸o >] Begin [<D·y c¸c lÖnh>] tªnhµm := gi¸trÞ; End;. [< PhÇn khai b¸o >] Begin [<D·y c¸c lÖnh>] End;.

<span class='text_page_counter'>(14)</span> 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..

<span class='text_page_counter'>(15)</span> NhËn xÐt • 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 ë trong CTC chØ cã t¸c dông trong CTC gäi lµ biÕn côc 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ù..

<span class='text_page_counter'>(16)</span> Program VD; Uses crt; var a,b: integer;. BiÕn toµn côc BiÕn côc bé. Tham sè h×nh thøc. 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.. Tham sè thùc sù (tham biÕn).

<span class='text_page_counter'>(17)</span> CHƯƠNG TRÌNH CON VÀ PHÂN LOẠI. Ghi 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 bé..  Tham sè - 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ù..

<span class='text_page_counter'>(18)</span>