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

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

Thêm vào BST

Báo xấu

186
lượt xem 18
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 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.

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 7

Bµ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 thao t¸c Có ph¸p LÖnh trong pascal 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Òu VÝ 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 nh So¹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 + F9
Ch¹y c h¬ng tr×nh: NhÊn tæ hîp phÝm Ctrl + F9 Lu c h¬ng tr×nh (file ): F2 Më 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¬ng tr×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