Chương trình hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal... Chạy chương trình và đưa ra kết quả... Chương trình hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal... Chạy chương
Trang 2Bµi 12
Gi¸o ¸n ®iÖn tö tin häc líp 11
Trang 3Tr×nh bµy c¸ch khai b¸o kiÓu d÷ liÖu x©u? cho vÝ dô.
KiÓm tra bµi cò
Trang 43 Mét sè vÝ dô
NhËp vµo hä tªn cña hai häc sinh, in ra mµn h×nh hä tªn dµi h¬n?
1
C¸c b íc: ThÓ hiÖn b»ng
pascal
1 Khai b¸o x©u Var a,b: string;
2 NhËp x©u BEGIN Write(‘ Nhap xau ho ten thu nhat :’); Readln(a);
Write(‘Nhap xau ho ten thu hai :’); Readln(b);
3 Xö lÝ x©u IF Length(a)>Length(b) Then write(a)
else write(b);
Readln;
END.
Trang 5Chương trình hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal
Trang 6Chạy chương trình và đưa ra kết quả
Trang 7Nhập vào hai xâu từ bàn phím, kiểm tra xem kí tự đầu tiên của xâu thứ nhất có trùng với kí tự cuối cùng của xâu thứ hai không?
2
Các b ớc:
1 Khai báo xâu : A,B
2 Nhập xâu
3 Xử lí xâu, trong đó:
Kí tự đầu tiên của xâu A: A[1]
Kí tự cuối cùng của xâu B: B[x] trong đó X là độ dài của xâu B
Dựa vào các b
ớc bên, hãy hoàn thiện ch
ơng trình?
Trang 8Chương trình hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal
Trang 9Chạy chương trình và đưa ra kết quả
Trang 10Nhập vào một xâu từ bàn phím, đ a ra màn hình xâu thu đ ợc bằng cách loại bỏ các dấu cách từ xâu đã cho?
3
Hãy nêu thuật toán để giải bài toán trên?
Ví dụ:
- Xâu ban đầu : ‘ Mon Tin hoc’
- Kết quả ra màn hình : ‘ MonTinho c’
Thuật toán
B1 Khởi tạo xâu rỗng;
B2 Lần l ợt duyệt qua tất cả các phần tử của xâu vừa nhập,
nếu phần tử đ ợc duyệt khác dấu cách thì bổ sung vào xâu rỗng.
Hãy viết ch ơng trình dựa theo thuật toán bên.
Trang 11Chương trình hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal
Trang 12Chạy chương trình và đưa ra kết quả
Trang 13+ ViÕt ch ¬ng tr×nh nhËp vµo bµn phÝm 1 x©u, xãa x©u võa nhËp vµ in ra x©u võa xãa
+ ViÕt ch ¬ng tr×nh nhËp vµo bµn phÝm 2 x©u s1,s2, chÌn x©u s1 vµ x©u s2 In ra x©u s2 võa chÌn
4
Bài làm thêm:
C¸c b íc:
B1 Khai b¸o x©u
B3 Xö lÝ x©u vừa xóa và xâu vừa chèn
Trang 14Chương trình chưa hoàn chỉnh cài đặt trên cửa sổ soạn thảo của Pascal
Trang 15Chương trình hoàn chỉnh được cài đặt trên cửa sổ soạn thảo của Pascal
Trang 16Chạy chương trình và đưa ra kết quả
Trang 17Hãy nhớ!
Xâu là dãy các kí tự trong bộ
mã ASCII
Khai báo: tên xâu, độ dài lớn
nhất của xâu.
Tham chiếu phần tử của xâu:
Tên xâu[chỉ số]
Các thao tác xử lí th ờng dùng: + Phép ghép xâu, so sánh xâu; + Các thủ tục và hàm chuẩn.
‘Xin chao cac ban!’
Var S : string[30]
S[1] = ‘ X ’
Trang 18Gi¸o ¸n ®iÖn tö tin häc líp 11