skkn một số phương pháp giúp học sinh giải bài tập về kiểu xâu thpt chuyên lương thế vinh

Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
MỘT SỐ PHƯƠNG PHÁP GIÚP HỌC SINH
GIẢI BÀI TẬP VỀ KIỂU XÂU
A- PHẦN MỞ ĐẦU
I/ LÝ DO CHỌN ĐỀ TÀI
Ngày nay, trên thế giới đang diễn ra quá trình tin học hoá trên nhiều lĩnh vực hoạt
động của xã hội loài người và đem lại nhiều hiệu quả to lớn. Việc sử dụng máy tính không
còn chỉ bó hẹp trong viện nghiên cứu, các trường đại học, các trung tâm máy tính mà còn
mở rộng ra mọi cơ quan, tổ chức kinh tế, và trong các gia đình. Song song với quá trình
trên, việc giảng dạy Tin học trong các trường đại học, THPT cũng được đẩy mạnh đi đôi
với việc tăng cường trang bị máy vi tính. Đảng và Nhà nước ta đã nhận thấy được tầm quan
trọng của ngành Tin học và đã đưa môn học này vào trường phổ thông như những môn học
khác bắt đầu từ năm học 2006-2007.
Chính vì vậy, đối với mỗi giáo viên giảng dạy môn Tin học ở các trường phổ thông,
việc tìm hiểu, nghiên cứu các vấn đề về Tin học, cùng với việc tìm các biện pháp giảng dạy
Tin học trong các trường phổ thông là một công việc cần phải làm thường xuyên, nhằm đáp
ứng với sự đòi hỏi ngày càng cao của xã hội.
Trong nghiệp vụ của người thầy giáo có hai vấn đề quan trọng: thứ nhất là thực tiễn
về tiềm năng - những kiến thức lý thuyết mà họ được học rất cơ bản. Thứ hai là thực tiễn về
nghiệp vụ - thầy giáo phải biết cách truyền thụ kiến thức phù hợp với trình độ của học sinh.
Trong đó, thực tiễn thứ hai là điều quyết định trong nghiệp vụ của thầy giáo, nó đánh giá
chất lượng giảng dạy của thầy giáo. Hai thực tiễn trên vừa mâu thuẫn với nhau, lại vừa
thống nhất với nhau. Thầy giáo không thể mang hết các kiến thức lý thuyết cao xa và trừu
tượng dạy cho học sinh, nhưng cũng không thể dạy tốt cho học sinh nếu thầy giáo hiểu biết
quá ít.
Trong bối cảnh toàn ngành Giáo dục và Đào tạo đang nỗ lực đổi mới phương pháp
dạy học theo hướng phát huy tính tích cực chủ động của học sinh trong hoạt động học tập.
Điều 24.2 của Luật giáo dục đã nêu rõ: “Phương pháp giáo dục phổ thông phải phát huy
tính tích cực, tự giác, chủ động, sáng tạo của học sinh, phù hợp với đặc điểm của từng lớp
học, môn học; bồi dưỡng phương pháp tự học, rèn luyện kỹ năng vận dụng kiến thức vào
thực tiễn, tác động đến tình cảm, đem lại niềm vui, hứng thú học tập cho học sinh”. Như

vậy, chúng ta có thể thấy định hướng đổi mới phương pháp dạy học đã được khẳng định,
không còn là vấn đề tranh luận. Cốt lõi của việc đổi mới phương pháp dạy học ở trường
Người thực hiện: Nguyễn Quang Hưng
1
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
phổ thông là giúp học sinh hướng tới việc học tập chủ động, chống lại thói quen học tập thụ
động.
Đổi mới phương pháp dạy học theo hướng tích cực hóa hoạt động của học sinh là
một quá trình lâu dài; không thể ngày một ngày hai mà đông đảo giáo viên từ bỏ được kiểu
dạy học truyền thụ kiến thức, tiếp thu thụ động đã quen thuộc từ lâu. Việc phát triển các
phương pháp tích cực đòi hỏi một số điều kiện, trong đó quan trọng nhất là bản thân mỗi
giáo viên cần có một sự nỗ lực để tìm tòi, sáng tạo trong công tác giảng dạy của mình.
Đổi mới phương pháp dạy học là một vấn đề hết sức quan trọng, nhất là với bộ môn
Tin học hiện đang được đưa vào giảng dạy ở các trường phổ thông. Là một giáo viên giảng
dạy bộ môn này, theo tôi không phải cứ tìm được nhiều bài toán khó, bài toán hay để giảng
dạy cho học sinh. Mà vấn đề đặt ra là chúng ta cần phải tích cực tìm tòi, sáng tạo trong việc
đưa ra những bài toán đó để giúp cho học sinh có sự hứng thú, tìm tòi sáng tạo trong quá
trình giài quyết học tập, từ đó biết vận dụng linh hoạt trong các tình huống cụ thể ngoài
thực tế.
Trong việc giảng dạy cho học sinh, ngoài việc giúp học sinh lĩnh hội những kiến
thức cơ bản. Người thầy còn phải biết kích thích tính tích cực, sự sáng tạo say mê học hỏi
của học sinh trong việc học tập của các em. Bởi vì, việc học tập tự giác, tích cực, chủ động
và sáng tạo đòi hỏi học sinh phải có ý thức về những mục tiêu đặt ra và tạo được động lực
bên trong thúc đẩy bản thân họ hoạt động để đạt các mục tiêu đó.
Các cách thiết kế bài giảng hiện nay nhằm mục đích áp dụng phương pháp hiện đại
để bồi dưỡng cho học sinh năng lực ham muốn học hỏi, tư duy sáng tạo, năng lực tự giải
quyết vấn đề, rèn luyện và phát triển năng lực tự học sáng tạo, nghiên cứu, nghĩ và làm việc
một cách tự chủ… Đồng thời để thích ứng với sự phát triển tư duy của học sinh trong xã
hội mới và tiếp cận với các công nghệ tiên tiến trong xã hội, trên thế giới. Bên cạnh đó,
trong các kỹ thuật dạy học mới, vai trò của người thầy có sự thay đổi là: “hướng dẫn học

sinh biết tự mình tìm ra hướng giải quyết những vấn đề nảy sinh trong quá trình học tập,
biết cách làm việc độc lập, làm việc tập thể. Thầy là người định hướng, là người cố vấn
giúp học sinh tự đánh giá, cũng như giúp học sinh luôn đi đúng con đường tìm hiểu, lĩnh
hội kiến thức…”.
- Xuất phát từ thực tiễn giảng dạy tại trường THPT Thanh Bình tôi thấy rằng, để đạt
hiệu quả cao trong mỗi phần học, tiết học cần có cách thiết kế bài giảng cho phù hợp với
nội dung kiến thức, phương pháp, phương tiện dạy học phải phù hợp với từng đối tượng
Người thực hiện: Nguyễn Quang Hưng
2
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
học sinh. Để qua mỗi phần học, tiết học học sinh thích thú với kiến thức mới, qua đó hiểu
được kiến thức đã học trên lớp, đồng thời học sinh thấy được tầm quan trọng của vấn đề và
việc ứng dụng của kiến thức trước hết để đáp ứng những yêu cầu của môn học, sau đó là
việc ứng dụng của nó vào các công việc thực tiển trong đời sống xã hội (nếu có).
Trong thời đại thông tin bùng nổ ngày nay, việc lập được các chương trình tự hoạt
động cho máy tính, máy gia dụng là cần thiết và để làm được việc đó cần có một quá trình
nghiên cứu, học tập về ngôn ngữ lập trình lâu dài, qua đó người lập trình có thể chọn một
ngôn ngữ lập trình thích hợp. Tuy nhiên mọi thứ điều có điểm khởi đầu của nó, với học
sinh việc học Pascal là khởi đầu cho việc tiếp cận ngôn ngữ lập trình bậc cao, qua đó giúp
các em hình dung được sự ra đời, cấu tạo, hoạt đông cũng như ích lợi của các chương trình
hoạt động trong máy tính, các máy tự động…Quá đó giúp các em có thêm một định hướng,
một niềm đam mê về tin học, về nghề nghiệp mà các em lựa chọn sau này. Đồng thời
Pascal là một ngôn ngữ có cấu trúc thể hiện trên 3 yếu tố: Cấu trúc về mặt dữ liệu, cấu trúc
về mặt câu lệnh, cấu trúc về mặt chương trình.
Tuy nhiên, trong các môn học ở bậc học THPT thì môn Tin học lớp 11 được các em
học sinh cho là môn học “khó khăn” nhất trong các môn học. Từ việc các em chỉ là người
sử dụng các phần mềm sẵn có như: hệ điều hành, sọan thảo văn bản Word, bảng tính Excel,
các phần mềm học tập, nghe nhạc hay chơi game… thì các em lại là người phải tìm ra lời
giải cho các bài toán, chỉ ra các bước cho máy tính thực hiện và viết chương trình để tạo ra
các sản phẩm phần mềm cho người khác sử dụng mặc dù mới chỉ là bước khởi đầu, cơ bản.

Turbo Pascal là ngôn ngữ lập trình có cấu trúc, nó được dùng phổ biến ở nước ta
hiện nay trong công tác giảng dạy, lập trình tính toán, đồ họa. Turbo Pascal được dùng
trong chương trình giảng dạy Tin học ở hầu hết các trường đại học, cao đẳng, trung học phổ
thông và nó được mệnh danh là “ngôn ngữ học đường”.
Các em học sinh phải làm quen với nhiều kiểu dữ liệu mới mà trong các môn học
khác không có, nhiều học sinh còn bỡ ngỡ không hiểu vì sao cùng là kiểu số nguyên mà lại
chia làm nhiều kiểu như byte, integer, word, … mà trong toán học chỉ gồm số nguyên âm
và nguyên dương. Hoặc các loại thông tin như hình ảnh, âm thanh… được xử lý như thế
nào. Kiến thức mới và khó, học sinh sợ học môn Tin học 11, kết quả giảng dậy thấp, nhất là
ở các lớp học sinh yếu về môn tự nhiên, ít có điều kiện sử dụng máy tính. Người thầy phải
làm gì để khắc phục được điều này?
Người thực hiện: Nguyễn Quang Hưng
3
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
II- THỰC TRẠNG CỦA VẤN ĐỀ NGHIÊN CỨU
1/Tình trạng thực tế khi chưa thực hiện đề tài
Trước đây khi chưa áp dụng phương pháp giảng dạy bằng giáo án điện tử, lấy ví dụ
từ thực tế… học sinh luôn phản ánh với giáo viên rằng: “Những bài tập về kiểu xâu” này
khó hiểu và trừu tượng. Khi kiểm tra với mức độ đề tương đương với một vài ví dụ trong
sách giáo khoa, các em vẫn mơ hồ và đạt kết quả chưa cao.
2/ Khảo sát thực tế
Giáo viên đưa ra đề kiểm tra 1 tiết đối với lớp 11A3 có 45 học sinh như sau:
Bài 1: Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang chữ in
hoa rồi in kết quả ra màn hình.
Ví dụ : Input: ‘abcdAbcD’
Output: ‘ABCDABCD’
Bài 2: Viết chương trình nhập vào một chuỗi, tách và in ra từ cuối cùng trong chuỗi.
Kết quả kiểm tra như sau:
Điểm Số học sinh Tỉ lệ
3 3 6,67%

4 7 15,56%
5 13 28,88%
6 10 22,22%
7 8 17,77%
8 3 6,67%
9 1 2,22%
Đối với hai ví dụ trên hấu hết các em chưa hình dung ra được thuật toán cũng như
các bước để viết chương trình
Để khắc phục được điều đó, theo tôi chúng ta cần phải tìm tòi, nghiên cứu tìm ra
những phương pháp phù hợp, kích thích tính tích cực của học sinh trong học tập. Học sinh
có thể tự mình tìm ra được những ý tưởng sáng tạo vận dụng thiết thực vào cuộc sống, thực
tế khi nhu cầu nảy sinh, khi đó các em có thể tự mình hoàn thành được ý tưởng đó.
Trên cơ sở những gì mà học sinh được học tập về môn lập trình Pascal, để giúp cho
học sinh nhìn nhận vấn đề một cách tích cực hơn, sáng tạo hơn và nhất là giúp cho các em
có thể yêu thích nhiều hơn nữa ngôn ngữ lập trình Pascal.
Người thực hiện: Nguyễn Quang Hưng
4
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Xuất phát từ cơ sở trên, tôi đã chọn đề tài “Một số phương pháp giúp học sinh giải
bài tập kiểu xâu”, giúp các em nắm được kiểu dữ liệu có cấu trúc- kiểu xâu và ứng dụng
của kiểu dữ liệu này trong thực tiễn (Chương IV-bài 12-tin học 11).
3/ Mục đích của sáng kiến kinh nghiệm.
Sử dụng các ví dụ cụ thể trước hết để học sinh nắm được cú pháp, ý nghĩa của kiểu
xâu. Và thông qua các ví dụ để kết hợp với bài tập và thực hành số 5 (giới thiệu trước 2 thủ
tục) để củng cố về phần kiến thức này, đồng thời tăng sự yêu thích, ham học hỏi của học
sinh đối với môn học vốn được mệnh danh là khó nhất trong các môn học ở lớp 11.
Người thực hiện: Nguyễn Quang Hưng
5
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
B- NỘI DUNG

I/ CHUẨN BỊ
1/ Về phương pháp:
- Giáo viên soạn trước một vài ví dụ trên máy tính bằng phần mềm PowerPoint. Sử
dụng phương pháp thuyết trình kết hợp pháp vấn.
- Đưa ra 1 số bài tập để học sinh thảo luận qua đó nắm vững được kiểu dữ liệu có
cấu trúc: kiểu xâu. Hình thành ở học sinh kỹ năng phân tích, xử lý các vấn đề liên quan đến
bài tập kiểu xâu, sử dụng thành thạo vòng lặp biết trước, thủ tục chuẩn vào/ra đơn giản
bước đầu làm quen với 1 số chương trình con dạng thủ tục tạo điều kiện thuận lợi cho việc
tiếp thu kiến thức về cách viết chương trình có cấu trúc.
2/ Về phương tiện:
- Giáo viên chuẩn bị máy tính “để bàn hoặc xách tay”, một máy chiếu, một màn chiếu,
bút chỉ laze, bảng phụ …
- Học sinh cần có đầy đủ sách bút, vở ghi…
II/ CÁC BƯỚC THỰC HIỆN BÀI GIẢNG
Bài tập 1: Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang
chữ in hoa rồi in kết quả ra màn hình.
Ví dụ : Input: ‘abcdAbcD’
Output: ‘ABCDABCD’
Giáo viên nêu câu hỏi:
Ứng dụng của viết chữ in hoa các em gặp trong những trường hợp nào?
Học sinh: Khi đi làm giấy khai sinh, kê khai lý lịch, làm hồ sơ thi tốt nghiệp, ĐH-CĐ…
Giáo viên: Làm thế nào để khi ta nhập họ tên vào máy là chữ thường thì khi hiện lên trên
màn hình là chữ in hoa có dấu?
Học sinh: Sử dụng hàm upcase(ch)
Giáo viên: Nhưng hàm upcase(ch) chỉ đổi được 1 kí tự thành ký tự in hoa, ở đây chúng ta
đổi cả 1 xâu kí tự? vậy chúng ta xử lý vấn đề này như thế nào?
Học sinh: Đưa ra cách xử lý.
Giáo viên: Chúng ta đã biết có thể coi xâu là mảng 1 chiều mà mỗi phần tử là một kí tự.
Mỗi kí tự của xâu được đánh số thứ tự thường bắt đầu từ 1, số kí tự của xâu chính là độ dài
của xâu. Vậy để có thể chuyển 1 xâu nhập từ bàn phím thành chữ in hoa thì ta sẽ chuyển

Người thực hiện: Nguyễn Quang Hưng
6
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
từng kí tự trong xâu thành kí tự in hoa: duyệt lần lượt từng phần tử trong xâu và gán phần
tử đó bằng giá trị mới upcase(ch);
Câu lệnh for i:=1 to length(st) do St[i]:=upcase(St[i]); dùng để thực hiện yêu cầu đó.
Giáo viên gọi học sinh lên bảng viết chương trình. Học sinh viết chương trình, sau đó giáo
viên nhận xét , sửa chữa nếu có sai sót.
Chạy chương trình để học sinh theo dõi kết quả thực hiện.
Chương tình bài tập 1:
Program inhoa;
Uses Crt;
Var St: String;
i:Byte;
Begin
Write(‘Nhap xau St: ‘); Readln(St);
For i:=1 to length(St) do St[i]:=Upcase(St[i]);
Write(‘Xau ket qua: ‘, St);
Readln;
End.
Bài tập 2: Viết chương rình nhập vào một chuỗi tách và in ra từ cuối cùng trong chuỗi:
Giáo viên gợi ý:
Khi nhập vào một chuỗi bất kỳ, có thể có khoảng trống sau từ cuối chuỗi. để xác
định từ cuối của chuỗi, trước tiên phải cắt bỏ các khoảng trống ở cuối chuỗi. sau đó xác
định vị trí (vitri) khoảng trống đầu tiên tính từ cuối trở về đầu. Từ cuối cùng chính là: các
ký tự bắt đầu từ vị trí (vitri+1) đến cuối chuỗi.
Ví dụ: s=’N Thanh Huong ’, length(s) trả về giá trị 16, Sau khi cắt khoảng trống cuối
s=’N Thanh Huong’, length(s) trả về giá trị 13. vị trí khoảng trống tìm thấy đầu tiên trong
chuỗi tính từ cuối lên là vitri = 8. Vậy ký tự từ vị trí đến cuối chuỗi tạo thành từ cuối là
Huong.

Chương trình bài tập 2
Program BT2;
Uses crt;
Var s: String;
i, vitri: byte;
Begin
Người thực hiện: Nguyễn Quang Hưng
7
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Clrscr;
Writeln(‘chuong trinh in tu cuoi cung cua chuoi’);
Write(‘Nhap vao chuoi s=’);
Readln(s);
{1} While s[length(s)=#32 do
{2} Delete (s,length(s),1);
{3} vitri:=0;
{4} for i:= length(s) downsto 1 do
{5} if s[i] = #32 then
{6} begin
{7} vitri:=1;
{8} break;
{} end;
{10} Write (‘Tu cuoi:’);
{11} For i:= vitri +1 to length(s) do write(s[i]);
{12} Readln;
{13} End.
Giáo viên giải thích:
{1} → {2} Vong lặp While dùng để cắt bỏ khoảng trống ở cuối chuỗi s. Nếu còn
thấy ký tự trống ở cuối chuỗi, lệnh {2} sẽ xóa ký tự trống đó và tiếp tục kiểm tra lại biểu
thức điều kiện lặp. Vòng lặp While sẽ thực hiện cho đến khi ký tự cuối cùng của chuỗi s

khác trống mới thôi.
Ví dụ:
Nhập s = ‘N Thanh Huong ’ , length(s)=16, s[16]= #32 → bắt đầu vong lặp While
Sau lệnh {2}, s = ‘N Thanh Huong ’ , length(s)=15, s[15]= #32 → tiếp tục lặp
Sau lệnh {2}, s = ‘N Thanh Huong ’, length(s)=14, s[14]= #32 → tiếp tục lặp
Sau lệnh {2}, s = ‘N Thanh Huong’ , length(s)=13, s[13]= ‘g’<>#32 → thoát lặp
{3} →{9}: Bắt đầu vòng lặp, biến xác định vị trí tìm thấy khoảng trống đầu tiên
bằng 0. Vòng lặp {4} lần lượt duyệt từ vị trí cuối đến vị trí đầu của chuỗi s. nếu ký tự i
khác trống thì giảm i để xét ký tự trước nó, nếu là khoảng trống {5}, thí cất vị trí này vào
biến vitri{7} và kết thúc ngay vòng lặp for {4} mà không cần đợi i giảm đến 1.
Trường hợp chuỗi s chỉ có một từ, không có khoảng trống (ví dụ: ‘Xuan’) thì vòng
lặp for sẽ kết thúc khi i giảm tới 1 và vị trí vẫn dữ nguyên giá trị 0 gán ở câu lệnh{3}. Khi
đó từ cuối bắt đầu bằng các ký tự (vitri+1) = 0+1=1 đến cuối chuỗi s.
Người thực hiện: Nguyễn Quang Hưng
8
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
{11} Vòng lặp for in các ký tự trong chuỗi s từ vị trí sau khoảng trống tìm được (vitri+1)
đến cuối chuỗi. Với length(s) trả về số ký tự thực có trong chuỗi s sau khi đã cắt bỏ những
khoảng trống ở cuối chuỗi.
Bài tập 3: Nhập 1 xâu St từ bàn phím (St<=80), đưa ra màn hình xâu đảo ngược của xâu đó
(viết theo chiều ngược lại).
VD: Input: ‘Hello’
Output: ‘olleH’
Giáo viên: Làm thế nào để chúng ta có thể viết ngược lại xâu nhập vào?
Học sinh: Trả lời
Giáo viên: Để duyệt lần lượt các kí tự trong xâu St từ 1 đến hết (phần tử cuối cùng có chỉ số
trùng với độ dài của xâu) ở các ví dụ và bài tập 1 chúng ta sử dụng vòng lặp biết trước for
i:=1 to length(st) do …Vậy nếu chúng ta sử dụng vòng lặp lùi for i:=length(s) downto 1 do
…thì có thể giải quyết được yêu cầu của bài toán không? Nếu được, em nào có thể viết
được chương trình?

Học sinh: Trả lời,
Giáo viên: Gọi học sinh lên bảng viết CT, sau đó nhận xét và chạy thử chương trình học
sinh viết, học sinh quan sát kết quả thực hiện chương trình trên màn hình máy chiếu.
Chương trình bài tập 3:
Program xaunguoc;
Uses Crt;
Var St: String[80];
i:Byte;
Begin
Write(‘Nhap xau St: ‘); Readln(St);
For i:=length(St) downto 1 do write(St[i]);
Write(‘Xau nguoc cua xau st la: ‘, St);
Readln;
End.
Người thực hiện: Nguyễn Quang Hưng
9
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Bài tập 4: Nhập 1 xâu St từ bàn phím (St<=25), đưa ra màn hình xâu st nhưng mỗi kí tự
viết trên 1 dòng
VD: Input: ‘Hello’
Output: H
e
l
l
o
Phần lớn học sinh vẫn chưa biết khi nào thì sử dụng write, khi nào dùng writeln.
Mục đích của bài tập này tôi đưa ra để nhằm củng cố cho học sinh việc sử dụng thành thạo
thủ tục write và writeln, sự khác biệt giữa 2 thủ tục này.
Giáo viên: gọi học sinh nhắc lại sự khác biệt giữa 2 thủ tục, sau đó gọi học sinh lên bảng
viết chương trình.

Giáo viên chạy chương trình hoặc sửa chương trình của bài tập 4, học sinh theo dõi
kết quả thực hiện trên màn hình  sự hứng thú cho học sinh khi học bài kiểu xâu và kết
hợp với các thủ tục tưởng chừng như đã rất quen thuộc nhưng khi vận dụng thì các em thấy
được sự kì diệu của tin học.
Chương trình bài tập 4:
Program baitap3;
Uses Crt;
Var St: String[25];
i:Byte;
Begin
Write(‘Nhap xau St: ‘); Readln(St);
Write(‘ket qua la: ‘);
For i:=1 to length(St) do writeln(St[i]:15);
Readln;
End.
Người thực hiện: Nguyễn Quang Hưng
10
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Bài tập 5: Nhập 1 xâu St từ bàn phím (St<=25), đưa ra màn hình xâu st nhưng mỗi kí tự
viết trên 1 dòng ngược lại với xâu St
VD: Input: ‘Hello’
Output: o
l
l
e
H
Khi tôi nêu bài toán và hỏi học sinh: bạn nào xung phong lên bảng viết chương trình thì đã
có khá nhiều cách tay giơ lên.
Chương trình mà em học sinh đã sửa như sau:
Program baitap5;

Uses Crt;
Var St: String[25];
i:Byte;
Begin
Write(‘Nhap xau St: ‘);
Readln(St);
Write(‘ketqua la:’);
For i:= length(St) downto 1 do writeln(St[i]:15);
Readln;
End.
Khi giáo viên chạy chương trình cho các em học sinh theo dõi kết quả trên màn hình
máy chiếu mà mình đã sửa thì các em ngạc nhiên và rất hào hứng: đơn giản chỉ sửa chương
trình có 1 ít mà đã có kết quả rất thú vị, các em thấy tin học 11 không khó lắm.
Giáo viên: Vậy chúng ta có thể tô màu cho chữ được không? Chẳng hạn xâu S đưa ra có
màu xanh hoặc đỏ hoặc mỗi kí tự có một màu khác nhau?
Giáo viên làm mẫu cho học sinh để các em thấy được kết quả cho các kí tự hiện ra
có màu xanh lá. Tất cả học sinh trong lớp đều thấy phấn chấn và hào hứng học tập.
Chương trình:
Program baitap5;
Uses Crt;
Người thực hiện: Nguyễn Quang Hưng
11
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Var St: String[25];
i:Byte;
Begin
Write(‘Nhap xau St: ‘);
Readln(St);
Write(‘ketqua la:’);
Textcolor(2);

For i:= length(St) downto 1 do writeln(St[i]:15);
Readln;
End.
Giáo viên: giới thiệu cho học sinh về nhà tham khảo bài 19 “Thư viện chương trình con
chuẩn” – phần kiến thức giảm tải và nêu thêm 1 số yêu cầu coi như bài tập ở nhà.
Giáo viên: Vậy làm thế nào để chúng ta có thể tạo ra được các dòng chữ chạy trên các biển
hiệu quảng cáo, hoặc khi các em không sử dụng máy tính vài phút thì trên màn hình hiện ra
các dòng chữ chuyển động từ trái sang hoặc từ trên xuống, kiểu chữ, màu chữ… trông rất
đẹp.
Khi nêu bài tập 5, tôi đã đặt câu hỏi như trên sau đó tôi mới nêu bài toán:
Bài tập 6: Nhập 1 xâu từ bàn phím, đưa xâu đó ra giữa màn hình, chuyển động dần về bên
trái, các ký tự đầu xâu sẽ lần lượt mất đi nhưng lại xuất hiện lần lượt ở cuối xâu. Tô màu
cho xâu xuất hiện trên màn hình.
Giáo viên: Chạy thử chương trình cho học sinh quan sát kết quả thực hiện, sau đó GV
hướng dẫn học sinh viết chương trình có sử dụng 2 thủ tục chữ chay và cắt dán ở bài tập và
thực hành số 6, giải thích các câu lệnh trong 2 thủ tục.
procedure catdan(s1:st79; var s2:st79);
begin
s2:=copy(s1,2,length(s1)-1)+s1[1];
end;
procedure cangiua(var s:st79);
var i,n:integer;
begin
n:=length(s);
n:=(80-n) div 2;
for i:=1 to n do s:=s+ ‘ ‘;
Người thực hiện: Nguyễn Quang Hưng
12
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
end;

Chương trình giải bài toán này như sau (giáo viên đã cài sẵn trên máy)
program chuchay;
uses Crt;
type st79=string[79];
var s1,s2: st79;
stop:bolean;
procedure catdan(s1:st79; var s2:st79);
begin
s2:=copy(s1,2,length(s1)-1)+s1[1];
end;
procedure cangiua(var s:st79);
var i,n:integer;
begin
n:=length(s);
n:=(80-n) div 2;
for i:=1 to n do s:=s+ ‘ ‘;
end;
begin
clrscr;
write(‘Nhap xau s1: ‘);
readln(s1);
stop:=false;
while not(stop) do
begin
gotoxy(1,12);
write(s1);
delay(600);
catdan(s1,s2);
s1:=s2;
stop:=keypressed

end;
readln;
end.
Người thực hiện: Nguyễn Quang Hưng
13
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Bài tập 7: Viết chương trình nhập vào một chuỗi, đổi các ký tự chữ hoa trong chuỗi thành
ký tự chữ thường, và các ký tự chữ thường trong chuỗi thành ký tự hoa
Ví dụ: Nhập ‘tHAO 12a3’ đổi thành ‘Thảo 12A3’
Giáo viên đặt vấn đề: Ta biết ký tự ‘A’ có số thứ tự trong bảng mã ASCII bằng 65, ‘a’ bằng
97, nghĩa là ORD(‘A’)+32 = 65 + 32 = 97. Tương tự với các ký tự chữ cái còn lại.
- Nêu để đổi một ký tự chữ thường ra hoa ta dùng công thức ORD(kytu)-32.
- Nêu để đổi một ký tự chữ hoa ra thường ta dùng công thức ORD(kytu)+32.
Giáo viên gơi ý và yêu cầu học sinh thảo luận và viết chương trình.
Chương trình đổi chữ hoa ra chữ thường và ngược lại.
Program BT7;
Uses CRT;
Var s: String;
i: integer;
Begin
Clrscr;
Writeln(‘Chuong trinh doi chu hoa ra thuong va nguoc lai’);
Write (‘Nhap vao chuoi s=’);
Readln(s);
For i:= 1 to length(s) do
If(s[i]<=’Z’) and (s[i]>=’A’) then
S[i]:= CHR(ord(s[i])+32);
Else
If(s[i]<=’z’) and (s[i]>=’a’) then
S[i]:= CHR(ord(s[i])-32);

Writeln(‘Chuoi da doi s=’,s);
Readln;
End.
Giáo viên giải thích: Hai cách viết sau sẽ cho kệt quả hoàn toàn khác nhau:
Cách 1:
If(s[i]<=’Z’) and (s[i]>=’A’) then
S[i]:= CHR(ord(s[i])+32);
Else
If(s[i]<=’z’) and (s[i]>=’a’) then
Người thực hiện: Nguyễn Quang Hưng
14
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
S[i]:= CHR(ord(s[i])-32);
Cách 2:
If(s[i]<=’Z’) and (s[i]>=’A’) then
S[i]:= CHR(ord(s[i])+32);
Else
S[i]:= CHR(ord(s[i])-32);
Với cách 1 được hiểu như sau: Nếu là chữ thường đổi thành chữ hoa, nếu là chữ hoa đổi
thành chữ thường, nếu là chữ số hay ký tự khác thì không làm gì cả.
Với cách 2 được hiểu như sau: Nếu là chữ hoa đổi thành chữ thường, nếu là chữ thường đổi
thành chữ hoa, nếu là chữ số hay ký tự khác thì đổi thành ký tự có số thứ tự trong bảng mà
ASCII nhỏ hơn nó 32 đơn vị.
Ví dụ: Ký tự ‘]’ có số thứ tự 92 giảm đi 32 đổi thành ký tự ’<’ có số thứ tự 60 là sai.
Trong quá trình thảo luận để giải thích, chứng minh vấn đề “khả năng chuyển đổi
qua lại giữa hai câu lệnh lặp” bắt buột học sinh phải nắm vững cú pháp, cũng như ý nghĩa
của hai câu lệnh trên. Dẫn đến việc các em thấy được sự giống và khác nhau của hai câu
lệnh một cách rõ ràng hơn.
Người thực hiện: Nguyễn Quang Hưng
15

Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
C. KẾT LUẬN
Trong quá trình trao đổi, thảo luận, trình bày học sinh được thể hiện khả năng vận
dụng, hiểu biết của mình nên các em tỏ ra hăng hái trong việc giơ tay phát biểu tranh luận.
Đồng thời tiết học trở nên sinh động hơn và giáo viên không đóng vai trò là người xây dựng
lý luận mà học sinh là người chủ động để giải quyết các vấn đề.
So sánh, đối chứng tỉ lệ % kết quả của học sinh trước và sau khi thực hiện đề tài ta
thấy rõ ràng kết quả của học sinh sau khi được học bằng giáo án điện tử trên máy chiếu kết
hợp mô phỏng trực quan, lấy dẫn chứng thực tế …cao hơn hẳn so với khi chưa thực hiện đề
tài.
Cụ thể kết quả thực tế đối với lớp 11a8 có 45 học sinh (với đề kiểm tra giống lớp
11A3 ở trên) sau khi thực hiện đề tài như sau:
Điểm Số học sinh Tỉ lệ
3 0 0%
4 0 0%
5 7 15,56%
6 10 33,33%
7 15 40%
8 5 11,11%
9 5 11,11%
10 3 6,67%
Ngôn ngữ lập trình nói chung đóng vai trò rất quan trọng trong việc xây dựng các
chương trình ứng dụng để phục vụ cho cuộc sống. Nhờ sự phát triển của tin học trong đó
các nhà lập trình chuyên nghiệp đóng vai trò không nhỏ mà hiện nay hầu hết các lĩnh vực
trong xã hội đã ứng dụng được tin học để giải quyết công viêc nhanh, hiệu quả và chính xác
hơn.
Hiện nay, ngôn ngữ lập trình Pascal đã trở thành ngôn ngữ lập trình phổ biến nhất
trên thế giới sử dụng trong lĩnh vực giảng dạy. Trong quá trình giảng dạy các thầy cô có thể
đưa ra các vấn đề như lập trình các game nhỏ…để các em có thể chứng tỏ được khả năng
của mình làm cho học sinh yêu thích môn học, ham học hỏi và tìm tòi sáng tạo.

Đề tài này mang tính thực tiển rất cao cụ thể là: trong tiết học các em học sinh đã chủ động
để tìm tòi lại kiến thức đã học qua đó giải quyết được vấn đề do giáo viên đặt ra. Trong quá
trình giải quyết vấn đề, giáo viên chỉ ra những sai lầm mà các em học sinh mắc phải do hiểu
không rỏ vấn đề giúp cho các em hiểu rỏ hơn về câu lệnh.
Người thực hiện: Nguyễn Quang Hưng
16
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
Kết quả là có rất nhiều em đã dể dàng vận dụng được câu lệnh lặp để giải các vấn
bài toán lặp do giáo viên đặt ra.
D - NHỮNG KIẾN NGHỊ
- Sau khi thực hiện đề tài, tôi xin có một vài ý kiến sau:
- Đề nghị cấp trên tạo điều kiện hơn nữa về cơ sở vật chất nhất là các trường ở vùng
sâu, vùng xa có hoàn cảnh khó khăn để các em học sinh có điều kiện tiếp xúc với máy tính
nhiều hơn.
Thanh Bình, Ngày 18 tháng 05 năm 2013
NGƯỜI THỰC HIỆN
Nguyễn Quang Hưng
Người thực hiện: Nguyễn Quang Hưng
17
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu
E. TÀI LIỆU THAM KHẢO
1.Sách giáo khoa tin học 11 Hồ Sĩ Đàm chủ biên
2. Sách giáo viên tin học 11 Hồ Sĩ Đàm chủ biên
3. Lý thuyết và Bài tập lập trình Pascal 5.5-6.0 Nguyễn Thị Kiều Duyên
4. Lý thuyết và bài tập Pascal Hạnh Nguyên.
5. Một số sáng kiến kinh nghiệm và ý kiến của đồng nghiệp.
6. Một số bài tập tham khảo trên Internet.
Người thực hiện: Nguyễn Quang Hưng
18
Một số phương pháp giúp học sinh giải bài tập về kiểu xâu

MỤC LỤC
A- MỞ ĐẦU 1
I/ Lý do chọn đề tài 1
II/ Thực trạng của vấn đề nghiên cứu 4
1/ Tình trang thực tế khiu chưa thực hiện đề tài 4
2/ Khảo sát thực tế 4
3/ Mục đích của sáng kiến kinh nghiệm 5
B- NỘI DUNG 6
I/ Chuẩn bị 6
1/ Về phương pháp 6
2/ Về phương tiện 6
II/ Các bước thực hiện bài giảng 6
C- KẾT LUẬN 16
D- KIẾN NGHỊ 17
E- TÀI LIỆU THAM KHẢO 18
Người thực hiện: Nguyễn Quang Hưng
19