ViÕt ch¬ng tr×nh vµ thùc hiÖn cã sö dông thñ tôc nµy.. - ChuÈn bÞ cho bµi thùc hµnh sè 7.[r]
(1)TiÕt: 46
Bµi thùc hµnh sè I Mơc tiªu:
1 KiÕn thøc:
- Củng cố lại kiến thức xâu kí tự, chơng trình
2 Kĩ năng:
- Rèn luyện kỹ xử lí xâu việc tạo hiệu ứng chữ chạy hình
- Nâng cao kĩ viết sử dụng chơng trình
3 Thái độ:
- Tự giác, tích cực chủ động thực hành II Đồ dùng dạy học
1 Chn bÞ cđa GV:
- Máy vi tính, tổ chức phịng máy để học sinh có đợc kỹ việc tổ chức sử dụng chơng trình lập trình
2 Chn bÞ cđa HS:
SGK, sách tập tập viết nhà III Hoạt động dạy học
Hoạt động 1: Tìm hiểu việc xây dựng thủ tục catdan(s1,s2) cangiua(s)
1 Mơc tiªu:
- Học sinh nắm đợc chức thủ tục catdan() cangiua() Biết đợc ý nghĩa tham số hơng trình
2 Néi dung:
- Thđ tơc catdan Type str79=string[79]
procedure catdan(s1:str79; var s2: str79); begin
s2:= copy9s1,2,length(s1)-1)+s1[1]; end;
- Thủ tục giữa:
procedure cangiua(var s: str79); var i,n:integer;
Begin
n:=length(s); n:=(80-n) div 2;
for i:=1 to n s:=’’ +s; end;
(2)3 C¸c bíc tiÕn hµnh:
Hoạt động GV HS Nội dung
1 Tìm hiểu thủ tục catdan(s1,s2) cangiua(s)
- ChiÕu néi dung thđ tơc catdan(s1,s2) - Hỏi: Đầu vào đầu thủ tục này?
- Hỏi: Chức thủ tục gì?
- Yêu cầu học sinh cho ví dơ minh ho¹
- ChiÕu thđ tơc cangiua(s) - Hỏi: Đầu vào thủ tục này?
- Hỏi: Thủ tục thực công việc gì?
2 Tìm hiểu chơng trình câu b, SGK trang 103, 104
- Chiếu chơng trình lên bảng - Hỏi: Chức chơng trình?
- Giới thiệu cho học sinh thủ tục chuẩn gotoxy(x,y); delay(n) keypessed;
- Thực chơng trình để học sinh thấy đợc kết qu
1 Quan sát thủ tục catdan(s1,s2) trả lời câu hỏi giáo viên
- Vào xâu ký tù s1 - Ra: x©u ký tù s2
- Thực việc tạo xâu s2 từ xâu s1 việc chuyển ký tự thứ đến vị trí cuối xâu
- s1=’abcd’ th× s2=’bcda’ - Quan sát, suy nghĩ trả lời
- đầu vào xâu ký tự S không 79 ký tù
- Thủ tục thực thêm vào trớc xâu S số ký tự trống để đa hình ký tự S ban đầu đợc dòng gồm 80 ký tự
2 Quan sát chơng trình bảng theo dõi dẫn dắt giáo viên
- Yờu cu ngi s dụng nhập xâu ký tự Đa xâu hình có dịng chữ chạy hình văn 25x80
- Quan sát hình để đối chiếu kết mà học sinh tự suy luận tớnh c
IV Củng cố
Câu hỏi bµi tËp vỊ nhµ:
- Viết thủ tục chaychu(s, dong) nhận tham số xâu S gồm không 79 ký tự biến nguyên Dong In hình dịng chữ xác định S chạy ỏ dịng Dong Viết chơng trình thực có sử dụng thủ tục