Tài liệu lập trình pascal căn bản
[...]... Printer; Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 8 — Trang 8 BAÌI 2 : CAẽC KHAẽI NIM C BAN CUA NGN NGặẻ PASCAL I. Cạc tỉì khoạ (Key word) trong ngän ngỉỵ Pascal: Cạc tỉì khoạ l cạc tỉì dng âãø khai bạo, âàût tãn cho âäúi tæåüng trong Pascal, khi ta âàût tãn cho âäúi tỉåüng no âọ, khäng âỉåüc âàût trng tãn våïi cạc tỉì khoạ. Bng tỉì khoạ trong ngän ngỉỵ Pascal gäưm: and, array, asm,... <Enter>. - Khåíi âäüng tỉì Windows: chn menu Start/Program/Borland Pascal . Nãúu chỉång trỗnh Pascal chổa õổồỹc caỡi vaỡo menu Start , baỷn coù thãø dng Windows Explorer chuøn âãún táûp tin BP.EXE hồûc TURBO.EXE v khåíi âäüng Pascal bàịng cạch chảy táûp tin ny. III. Cạc phêm chỉïc nàng cáưn biãút ca ngän ngổợ Pascal: - F2: Lổu chổồng trỗnh trong khi soaỷn tho. - F3: Tảo mäüt file... tỉì bn phêm (khại niãûm säú ngun täú: l säú ngun chè chia chàơn hãút cho 1 v chênh nọ). Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 19 — Trang 19 Begin Writeln(Lst,’ Welcome to Turbo Pascal Language ! ‘ ); End. 1 Kãút qu: Khi chảy mạy in ra giáúy cáu Welcome to Turbo Pascal Language ! 3. Lãûnh Nháûp: Lãûnh nháûp dng âãø âỉa dỉỵ liãûu tỉì bn phêm vo cạc biãún. Cụ phạp: (1) Readln(Biãún_1,... tra lọựi. - Ctrl - F9: Chaỷy chổồng trỗnh. - Alt - F5: Xem kóỳt quaớ chaỷy chổồng trỗnh. - Alt - X: Thoaùt khoới maỡn hỗnh soaỷn thaớo chổồng trỗnh Pascal. IV. Cỏỳu truùc mọỹt chổồng trỗnh Pascal: 1. Cỏỳu truùc cồ baớn: Chổồng trỗnh Pascal õồn giaớn nhỏỳt phi cọ hai tỉì khoạ Begin v End nhỉ sau: Begin End. Chổồng trỗnh trón tuy khọng laỡm gỗ khi chaỷy (ỏỳn Ctrl - F9) nhổng laỡ... khai baïo: (1) Var Biãún_1, Biãún_2, Biãún_n: String; Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 26 — Trang 2 6 Trỉåìng håüp âãø gii quút bi toạn no âọ m ta cáưn phi làûp âi làûp lải mäüt cäng viãûc no âọ thỗ ta seợ cỏửn õóỳn lóỷnh lỷp. Sọỳ bổồùc lỷp cọ thãø xạc âënh hồûc khäng xạc âënh. Trong ngän ngỉỵ Pascal cọ ba cáu lãûnh làûp l FOR, REPEAT, WHILE. Nóỳu sọỳ voỡng lỷp xaùc õởnh... BI 4: CẠC LÃÛNH CỌ CÁÚU TRỤC TRONG NGÄN NGặẻ PASCAL I. Lóỷnh gheùp: Lóỷnh gheùp laỡ mọỹt nhoùm cạc cáu lãûnh âỉåüc âàût giỉỵa hai tỉì khoạ BEGIN v END . Lãûnh ghẹp âỉåüc thỉûc hiãûn bàịng cạch thỉûc hiãûn tưn tỉû cạc cáu lãûnh nàịm giỉỵa BEGIN v END. Cụ phạp: Begin <cáu lãûnh 1>; <cáu lãûnh 2>; Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 43 — Trang 43 End. ... trỗnh kiãøm tra ba säú âỉåüc nháûp tỉì bn phêm cọ thãø l âäü di ca ba cảnh trong mäüt tam giạc hay khäng? Nãúu âụng l ba cảnh ca tam giaùc thỗ Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 2 — Trang 2 Ta coï thãø khåíi âäüng Pascal tỉì Windows hồûc MS-DOS , chuøn âãún thỉ mủc BP hồûc TP v chảy táûp tin BP.EXE hay TURBO.EXE . Hai cạch khåíi âäüng trãn thỉûc hiãûn nhỉ sau: - Khåíi âäüng... trong giåïi hản tỉì 2.9E -39 âãún 1.7E 38 (2,9 x10 - 39 âãún 1,7 x 10 38 ). Kiãøu Real chiãúm 6 bytes trãn bäü nhåï. Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 49 — Trang 49 Chn mu nãưn trong chãú âäü vàn baín (Chãú âäü màûc âënh khi chảy Pascal) . Color cọ giạ trë tỉì 0 âãún 7. 11. Th tủc TextColor(Color : Byte): Chn mu ca k tổỷ trỗnh baỡy trón maỡn hỗnh. Color coù giaù trở tỉì 0... Hai Bay; {Kiãøu Ngay_Lam_Viec l khon con ca kiãøu Ngay } Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 5 — Trang 5 Var HoDem, Ten : String; N : Integer; Ư Ghi chụ: - Thỉï tỉû cạc khai bạo trãn l âiãưu bàõt büc, ta phi nàõm thỉï tỉû ny cho d mäüt säú khại niãûm ta chỉa âỉåüc biãút. - Trong chỉång trỗnh Pascal, õóứ taỷo lồỡi chuù thờch, ta sổớ duỷng càûp dáúu { } hồûc (* *) läưng cạc... chỉång trỗnh. Trong chổồng trỗnh coù thóứ coù nhióửu khọỳi lóỷnh, tỉïc cọ thãø cọ nhiãưu càûp tỉì khoạ Begin v End. 2. Phỉång phạp khai bạo v täø chỉïc cáúu truùc mọỹt chổồng trỗnh Pascal: Giaùo trỗnh Lỏỷp trỗnh Pascal cn baớn – 39 — Trang 39 Trong âoï: - Kiãøu _ pháưn _ tỉí l kiãøu dỉỵ liãûu ca mäùi pháưn tỉí trong mng (l kiãøu báút k). - Chè _ säú l danh sạch cạc chè säú âãø . Trang 1 BI 1: GIÅÏI THIÃÛU NGÄN NGỈỴ PASCAL V CẠC VÊ DỦ ÂÅN GIN I. Xút xỉï ngän ngỉỵ Pascal: Pascal l ngän ngỉỵ láûp trçnh cáúp cao do Niklaus. âãư xút nàm 1970 våïi tãn Pascal âãø k niãûm nh toạn hc v triãút hc näøi tiãúng Blaise Pascal (ngỉåìi Phạp). Ngän ngỉỵ láûp trçnh Pascal cọ âàûc âiãøm: ngỉỵ