--- ---
Tiết 56: KIỂM TRA 1 TIẾT ( LT)
I. Mục tiêu:
- Hệ thống lại một số kiến thức đã học.
- Biết sử dụng vòng lặp xác định và vòng lặp không xác định để viết chương trình.
II. Đề bài:
Câu 1. Em hãy nêu cú pháp và hoạt động của vòng lặp không xác định (3đ) Câu 2. Em hãy nêu cú pháp và hoạt động của vòng lặp xác định (3đ)
Câu 3. Em hãy viết chương trình tính tổng các số tự nhiên từ 100 đến 1000 ( Sử dụng vòng lặp xác định và vòng lặp không xác định)
III. Đáp án:
Câu 1: Cú pháp và hoạt động của vòng lặp không xác định. * Cú pháp:
While <điều kiện> do <câu lênh>; * Hoạt động:
- B2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện câu lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại B1.
Câu 2: Cú pháp và hoạt động của vòng lặp xác định * Cú pháp:
For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; * Hoạt động của vòng lặp:
- B1: biến đếm nhận giá trị đầu
- B2: Chương trình kiểm tra biểu thức điều kiện, nếu biểu thức điều kiện đúng thì thực hiện câu lệnh.
- B3: Biến đếm tự động tăng lên 1 đơn vị và quay lại B2.
- B4: Nếu biểu thức điều kiện nhận giá trị sai thì thoát ra khỏi vòng lặp. Câu 3. Viết chương trình tính tổng các số tự nhiên từ 100 đến 1000 * Vòng lặp xác định: Program tinh_tong; Var i, S: Integer; Begin For i:= 100 to 1000 do S:= S + i;
Wirteln(‘ tong cac so tu nhien tu 100 den 1000 la:’,S); Readln; End. * Vòng lặp không xác định: Program tinh_tong; Var i, S: Integer; Begin i:= 100; S:= 0; While i > 1000 do S:= S + i; i:= i + 1;
Writeln(‘ Tong cac so tu nhien tu 100 den 1000 la:’,S); Readln;
Tiết 57: KIỂM TRA 1 TIẾT ( TH)
I. Mục tiêu:
- Hệ thống lại một số kiến thức đã học.
- Biết sử dụng vòng lặp xác định và vòng lặp không xác định để viết chương trình.
II. Đề bài:
Câu 1. Em hãy viết chương trình tính tổng các số chẳn từ 1 đến 100 (6đ) Câu 2. Em hãy dịch và sửa lỗi chương trình (nếu có) (2đ)
Câu 3. Em hãy chạy chương trình và kiểm tra kết quả (2đ) III. Đáp án:
Câu 1: Chương trình tính tổng các số chẳn từ 1 đến 100 (sử dụng vòng lặp không xác đinh) Program tinh_tong_cac_so_chan;
Var i, S: Integer; Begin
S:= 0; i:= 2;
While i <= 100 do Begin
S:= S+ i; i:= i + 2; End;
Writeln( ‘ Tong cac so chẳn tu 1 den 100 =’, S); Readln;
End.
Câu 2: Nhấn F9 để dịch và sửa lỗi chương trình
Câu 3. Nhấn Ctrl +F9 để chạy và kiểm tra chương trình
Tiết 58: LÀM VIỆC VỚI DÃY SỐI. Mục tiêu: I. Mục tiêu:
1. Kiến thức:
- Làm quen với việc khai báo và sử dụng các biến mảng. - Tìm hiểu một số ví dụ về biến mảng.
2. Kĩ năng:
- Việc gán giá trị, nhập giá trị và tính toán với các giá trị của một phần tử trong biến mảng được thực hiện thông qua chỉ số tương ứng của phần tử đó.
3. Thái độ:
- Thái độ học tập nghiêm túc, yêu thích môn học.
II. Chuẩn bị:
Sách giáo khoa, máy tính điện tử.
III. Tiến trình bài dạy:
T/g Hoạt động của thầy Hoạt động của trò Nội dung
18p + Hoạt động 1: Tìm hiểu dãy số 1. Dãy số và biến mảng:
20p
và biến mảng
- Yêu cầu HS đọc ví dụ 1
- Ví dụ như trong Pascal ta cần nhiều câu lệnh khai báo và nhập dữ liệu dạng sau đây, mỗi câu lệnh tương ứng với điểm của một học sinh
? Dữ liệu mảng là gì.
+ Hoạt động 2: Ví dụ về biến mảng.