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

Bài giảng Điện tử Tin học lớp 11 - Bài 7: Các thủ tục chuẩn vào/ra đơn giản, giới thiệu với các em các thủ tục chuẩn vào ra đơn giản và soạn thảo, dịch, thực hiện và hiệu chỉnh chương trình. Chúc các em học tốt.
Nội dung trích xuất từ tài liệu:
Bài giảng Điện tử Tin học lớp 11: Bài 7Bµi 7 Gi¸o ¸n ®iÖn tö tin häc líp 11 Bµi to ¸n ®Æt vÊn ®ÒBµi to ¸n 1: ViÕt c h¬ng tr×nh tÝnh c hu vi (CV) vµ diÖn tÝc h (S ) c ña h×nh c h÷ nhËt, biÕt c hiÒu dµi a = 12, c hiÒu ré ng b = 8. ? • H·y khai b ¸o c ¸c b iÕn c Çn d ïng tro ng c h¬ng tr×nh. • ViÕt lÖnh g ¸n ®Ó tÝnh c hu v i, d iÖn tÝc h h×nh c h÷ nhËt.  Var a,b,CV,S : byte ;  a:=12; b:=8; CV:=(a+b)*2; S :=a*b;Bµi to ¸n 2: ViÕt c h¬ng tr×nh tÝnh vµ in ra mµn h×nh c hu vi (CV) vµ diÖn tÝc h (S ) c ña h×nh c h÷ nhËt, víi c hiÒu dµi a vµ c hiÒu ré ng b bÊt k× . ? • H·y nªu c ¸c h gi¶i quy Õt bµi to¸n trªn? §Ó gi¶i quyÕt bµi to¸n trªn c ¸c ng«n ng÷ lËp tr×nh c ung c Êp thñ tôc c huÈn vµo/ra ®¬n gi¶n. I. C¸c thñ tôc chuÈn vµo/ra ® n gi¶n ¬1. NhËp d÷ liÖu vµo tõ bµn phÝm thaot¸c Cóph¸pLÖnhtrongpascal 1. Th«ng b ¸o nhËp Write (‘Th«ng b ¸o ’); Re ad(); 2. NhËp th«ng tin tõ b µn p hÝm Re adln(); • Danh s ¸c h b iÕn v µo : lµ m é t hay nhiÒu b iÕn ®¬n, trê ng hîp nhiÒuVÝ dô: ®¬n p h¶iNhap nhau b ë i ddai, ’, ’ b iÕn Write(‘ c ¸c h vao chieu Êu chieu rong HCN:’); readln(a,b); • Thñ tô c READLN c ã thÓ kh«ng c ã tham s è d ïng ®Ó t¹m d õ ng c h ¬ng tr×nh c ho ®Õn khi ng ê i d ïng Ên p hÝm Ente r (Re ad ln;).2. §a th«ng tin ra mµn h×nh Write (); Write ln(3. Mé t s è vÝ dôVÝ dô 1: H·y nª u tª n c ¸c thµnh p hÇn v µ c ¸c thñ tô c tro ng c h¬ng tr×nh s au: PhÇn khai b¸o PhÇn th© ch n Program VD_1; ¬ tr× ng nh Var N: Byte; Thñ tôc nhËp d÷ BEGIN liÖu tõ bµn phÝm Write(‘ Lop ban co bao nhieu nguoi: ‘); Thñ tôc in kÕt qu¶ ra mµn h× nh Readln(N); Writeln(‘ That the a! Vay la ban co ‘,N-1,’ nguoi ban trong lop ’); Writeln(‘ Go Enter de ket thuc chuong trinh.’); Readln; END. Ch¬ tr× ch¹y vµ cho kÕt qu¶ nh ng nh sau: Lop ban c o bao nhie u nguoi: - 42 That the a! Vay ban co 41 nguoi ban trong lop.* Khi nhËp g i¸ trÞ c ho nhiÒu biÕn, mç i g i¸ trÞ c ¸c h nhau mé t dÊu c ¸c h* NhËp xo ng nhÊn phÝm ENTER ®Ó thùc hiÖn lÖnh tiÕp the o .VÝ dô 2: ViÕt c h¬ng tr×nh tÝnh vµ in ra mµn h×nh c hu vi (CV) vµ diÖn tÝc h (S ) c ña h×nh c h÷ nhËt, víi c hiÒu dµi a vµ c hiÒu ré ng b bÊt k× . Program VD_2; Var a,b,CV,S: real; BEGIN Write(‘ Nhap chieu dai va chieu rong cua HCN: ’); Readln(a,b); CV:= (a+b)*2; S:= a*b; Writeln(‘ Chu vi HCN = ’, CV:7:2); Writeln(‘Dien tich HCN =’,S:7:2); Readln; END.II. So¹n th¶o, dÞch, thùc hiÖn vµ hiÖu chØnh ch¬ tr× ng nhSo¹n th¶o : Gâ né i dung c h¬ng tr×nh lªn mµn h×nh s o¹n th¶o c ña Turbo Pas c al.Biªn dÞc h c h¬ng tr×nh: NhÊn tæ hîp phÝm Alt + F9Ch¹y c h¬ng tr×nh: NhÊn tæ hîp phÝm Ctrl + F9Lu c h¬ng tr×nh (file ): F2Më tÖp: F3 §ãng c öa s æ c h¬ng tr×nh: Alt + F3 Tho¸t khái c h¬ng tr×nh Pas c al: Alt + X H·y nhí!  Thñ tôc nhËp th«ng tin tõ bµn phÝm. – Re ad(); – Re adln( );  Thñ tôc ® th«ng tin ra mµn a h×nh – Write (); – Write ln( );Th«ng thê ng c ¸c c h¬ngtr×nh c Çn c ã s ù hç trî tõ Ch¬ng tr× nh Pascal cã thÓtÖp th viÖn TURBO.TPL so¹n th¶o, dÞch vµ thùc hiÖn b»ng tÖp Turbo.exe ...