!" #$!! % ! & '! # (!)*! + • ! % # • % % # • &", # (!- - &", # !"#!$ "%&' 2.1.1. Gán tên file ./0+(()*'+,)-.'/0.12 .1"+20 34567 !,84 9:;< 4=>?@A',847:# Chú ý: )-.'/0.,!B CD5&7EF84%G !D5 =AE# 2.1.2. Mở file mới ./0+3.45)!.+12 .1"+(H!4 I6J0!,84#K84J65L 9 MA6N,O;!0&7!P4PQ&ORST4# 2.1.3. Mở file đã có trên đĩa ./0+3.(.!+12 .1"+UQ46J0!,84#K8465L -LNV&LWX;<YZ#[ - % % - 4# Chú ý:)60!5/7")089)-.K- - % & !," :;<=& :;>=& !- & \#$ ]!+^! !, % ' - 4#K ]!! _ %! - % _ ! # [R=+ )! U!` [(a+b` +(;` c ^dKZ+d`(a` e(a` :;<=\`:;>= ]4]!fg_ c hd.!!%:;+d(a` i;` i Giáo trình bài tập Pascal i^dj!!!%:;d` i` 2.1.4. Đọc dữ liệu từ file ./0+3./?+,@12 .1"+9 3SkMAV4Q&OR!P4&70!0,8 ;# 2.1.5. Ghi dữ liệu lên file ./0+A5)!.+,/-%.12 .1"+20O[&7!4H&ORAET!P4# 2.1.6. Đóng file ./0+-B(.+12 .1"+.ZZ 9kD4&7%8/ 9!047:# 2.2.2. Hàm kiểm tra cuối file ./0+C+12 .1"+l7 C&m0OTrue8!P4Qn4?H7 C&m0OFalse. DEF+G1 H"/)IB [ JK'I)L'9)-.M.@!2 [ ++(;` H !"#!$ NO"O0 "P! QR'*!5K'9)-.?S'*!.@! 3.2.1. Thủ tục Append ./0+TT.'?+12 .1"+UQ4JBH>,D3&7!n4# 3.2.2. Thủ tục Readln ./0+3./?-'+,@12 .1"+9 3oV&OR!P4&70!,8@#(@A;! !P4N:>&mSo8!#c8@6>Z0%>+.b !W%>n# . : +% Readln(F,x) ! :! :# 3.2.3. Thủ tục Writeln ./0+A5)!.-'+,@12 .1"+20O;&7!4Q&OR!P4#j8/T=!P4N :>&mSo# 3.2.4. O0C' ./0+C'+12 .1"+l7 C&m0OTrue8!PQn 3o?H7 C&m0OFalse# Chú ý • b:70!0-,C%;<Z4+ 2 Giáo trình bài tập Pascal U")?V-)W%NOB9)-. XY ?V-)W%!Z9)-. ebb]2K4K ` \i^\](i4` ### ^\](i4&` ### .pqbi4` ebb]2K4K ` \ibi(4` ### ^K!iq4$! c \ie$4;` ### i` ### .pqbi4` E [ \] EO)!^T)K ! "_`'*!5a [ '"QB / (b '*%cK'!5B'*0b !)-.!.@!N/ [ */ ' / (b '*%cK'QB N/ [ B0/ d '*+)-.!.@!*b [ 0 / (b '*%cK'Q/ e -_%` d b d _ '*1 [4+(;` 4+b` e+e:rs##s__t!4` +` c ^uK4+u` \4` e44` vw]xy\4`vw]zy ]4]!fg_ c ^uj!!!+u4` ls` i` +{_` ^K!iq4! c ^K!iqpK4! c `\rt` i` \4` i` .!4` ^` ]4g_ c ^ue{u` !+{s!!hrtuu` i` \` 3 Giáo trình bài tập Pascal i# EO)!^T)K ! "_`'*!5a [ '"QB N/ [ QK 0(b -_` '*(b '*%cK'!5B'*0b !)-.!.@! EO)!^TH)K ! "_`'*!5a [ '"!/ B5/0b !)-.!.@! B !K']*b [ 0 / (b '*%cK'a '"!b d '* / (b '*%cK'!5K'0b !"/ [ '*K !f%/ d -_%N/ [ B)-.!.@! B !K' C,!5B'*QB 0b e )!b d '*Q_` *")!5K'0b !"/ [ '* .|H $}p]i}#]K) ⇒ $}p]i}#q}( ~• ss *~€s•• *s ‚•~s_~ *ƒ €•ƒ•s •_ EO)!^TH)K ! "_`'*!5a [ '"(g T@K T / (b '*%cK'!5B'*0b !)-.!.@!!".B!"_ !_ !g'*?h [ ' EO)!^Ti [8-L@A0&A+ ! •4;n:&7„;8/!1@"S# , lJ:n•46H&I741*!!4 I&F61@" S# Gợi ý+ x. ec :! !•4 " ; ! ec# x.,! > !IF+ % [ '*!"K00/ d '*N/ [ !/!)K '"/ [ '"'"_(/% $…•†n‡>:A'0SkT• Cec&7%7†n! C.# (!%f{ &7‡f{L+ v(17%BEC•J:ecm:A8y zK8ertgcr‡tL+.r%t+{ert`+{zs` zK?H+.r%t+{cr‡t`‡+{‡zs` K8J:7!8IL SoHTJ:%,D&7!nJ:.# E\]jUF c7Zs+ [8-L@A0&A+ (H!•4n:&7„;8/!1@"S# lJ:n•46H&I741*!!4 I&F61@" S# c7Z•+.!• Cn:+UCe6 Sk Cc6Sk# Yb„;8H0 C6!1@C S# ,Y(3• C6H7 C.!! C.&F61@C Sj ?;8H C.# c7Z*+ .!1);{ _ z s ;z • ; • z###z ; (!67,ZT1&7 _ s ### 70AnT1?! 34&",C&I'I+ x$oST4&",C1,ZT1&70OT;# 4 Giáo trình bài tập Pascal x$o8!10AnT1# [R=+);{*z•;x•; • zƒ; * ;{•#•N?!4&",C+ * •#• * • x• ƒ [8-L94&",C><:0nABR0OT1# Gợi ý+ x(D1 C>1# x[8T=>94;&7! C# c7Zƒ+[8-LH!Z0n%>h! 70n! X 4J?„1@"S#lJ:H!Z I1<C0nT•Z !!1@"S&F?:L# Chú ý: j?… C# 5 . Ghi dữ liệu lên file ./0+A5)!.+,/-%.12 .1"+20O[&7!4H&ORAET!P4# 2.1.6. Đóng file. i^dj!!!%:;d` i` 2.1.4. Đọc dữ liệu từ file ./0+3./?+,@12 .1"+9 3SkMAV4Q&OR!P4&70!0,8