TAILIEUCHUNG - Ebook Tự học lập trình Pascal (Tập 3): Phần 2 - Bùi Việt Hà (chủ biên)

Tiếp nối phần 1, phần 2 ebook Tự học lập trình Pascal (Tập 3) do Bùi Việt Hà chủ biên biên soạn trình bày phần hướng dẫn các bài tập được đưa ra ở bài học số 5 trở đi. nội dung 2 phần ebook. | 100 JìiÌỊX Z Z PalcsiL - Begin Clrscr Writeln Chương trinh tìm một xàu con chung cực đại của hai xâu Writef Nhập xàu S1 Readln S1 Writer Nhập xâu S2 Readln S2 11 length s1 s2 k 0 kmax 0 For i -1 to 11 do For j 1 to I2 do Begin If s1 i s2 j then Begin k 1 While i k H and j k l2 and s1 i k s2 j k do inc k lfkmax k then Begin kmax k imax i End End End if kmax-0 then Writeln Hai xâu S1 va S2 không CÓ xâu con nào chung Else Begin Wrife Hai xâu S1 và S2 có xâu con chung Phẩn 2. HƯỚNG DẪN 101 dài nhất lá For i -imax to imax kmax-1 do Write s1 i End Readln End. 11. Program P3411 Uses crt Const so set of charge 1 2 3 4 5 1 6 778 9 0 Var s s1 string k I byte 0 d boolean Begin Clrscr Write In Chương trinh tìm xâu con dộ dài k cỏ chứa kí tự Sũ của S Write Nhập xâu s Readln s Writef Nhập số k Readln k l length s d -false For i 1 to l-k 1 do Begin s1 -copy s i k -- fa Ise For j 1 to k do if in so then c true if c then Begin Wrileln sl d true 102 ậọ- blink- PtUcal - lập 3 End End if not d then WritelnfKhong có xâu như vậy Readln End. 12. Program P3412 Uses crt Var s1 s2 string p K 11 12 byte Begin Clrscr Writeln Chương trình tìm vị trí cuối cùng của S1 1 trong S2 Writef Nhập xâu S1 Reàdln s1 Write Nhập xâu S2 Readln s2 11 length s1 k 0 p pos s1 s2 While p 0 do Begin k k p s2 s2 copy s2 p 1 l2-p s1 s2 End if k 0 then Writelnf Vị trí cuối cùng của S1 trong E là k

• Kỹ thuật lập trình
• Lập trình Pascal
• Tự học lập trình Pascal
• Bài tập lập trình Pascal
• Ngôn ngữ lập trình Pascal
• Kỹ thuật lập trình
• Học lập trình Pascal
• Bài giảng Ngôn ngữ lập trình Pascal
• Thực hành Turbo Pascal
• Turbo Pascal Version 5
• Turbo Pascal Version 7
• Cách khởi động Turbo Pascal
• Turbo Pascal
• lập trình Turbo Pascal
• kỹ thuật lập trình Turbo Pascal
• kinh nghiệm lập trình Turbo Pascal
• hướng dẫn lập trình Turbo Pascal
• phương pháp lập trình Turbo Pascal
• Bài giảng môn Lập trình Pascal
• Môn Lập trình Pascal
• Kỹ thuật Lập trình Pascal
• Cấu trúc chương trình Pascal
• Ngôn ngữ Pascal
• Môi trường làm việc của Turbo Pascal
• Bài giảng Lập trình Pascal
• Lệnh cơ bản trong Pascal
• Cấu trúc một chương trình Pascal
• Thuật toán lập trình
• Kinh nghiệm sử dụng
• Lập trình căn bản
• Ngôn ngữ lập trình
• Kỹ thuật pascal
• Tài liệu về pascal
• Giáo trình pascal căn bản
• tài liệu lập trình Pascal
• giáo trình lập trình Pascal