Tiết 51_bài TH 6
Chia sẻ bởi Trần Hữu Quyết |
Ngày 14/10/2018 |
51
Chia sẻ tài liệu: tiết 51_bài TH 6 thuộc Tin học 8
Nội dung tài liệu:
Ngày soạn: ......................................... Ngày giảng: .....................................................
Tiết 51
Bài thực hành 6: Sử dụng lệnh lặp while...do (T1)
I - MỤC TIÊU
1. Kiến thức
- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước.
2. Kỹ năng
- Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh.
3. Thái độ: Nghiêm túc, tích cực.
II. CHUẨN BỊ
1. Giáo viên: giáo án, máy chiếu
2. Học sinh: Kiến thức cũ, sách, vở.
III - PHƯƠNG PHÁP
- Thuyết trình, giảng giải, vấn đáp.
IV - TIẾN TRÌNH LÊN LỚP
1 - ỔN ĐỊNH (1’)
2 - KIỂM TRA BÀI CŨ (3’)
- Hãy cho một số ví dụ về lặp với số lần chưa biết trước.
3 - BÀI MỚI (38’)
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG KIẾN THỨC
GV: Đưa ra bài tập 1 SGK
? Gọi học sinh nêu ý tưởng
- GV hướng dẫn
HS: Làm bài tập
Bài 1. Viết chương trình sử dụng lệnh lặp While…do để tính trung bình n số thực x1, x2, x3,..., xn. Các số n và x1, x2, x3,..., xn được nhập vào từ bàn phím.
Ý tưởng: Sử dụng một biến đếm và lệnh lặp While…do để nhập và cộng dần các số vào một biến kiểu số thực cho đến khi nhập đủ n số.
a) Mô tả thuật toán của chương trình, các biến dự định sẽ sử dụng và kiểu của chúng.
b) Gõ chương trình sau đây và lưu chương trình với tên Tinh_TB:
Program Tinh_Trung_binh;
uses crt;
Var
n, dem: Integer;
x, TB: real;
begin
clrscr;
dem:=0 ; TB:=0 ;
write(`Nhap so cac so can tinh n = `); readln(n);
while dem begin
dem:=dem+1;
write(`Nhap so thu `,dem,`= `); readln(x);
TB:=TB+x;
end;
TB:=TB/n;
writeln(`Trung binh cua `,n,` so la = `,TB:10:3);
writeln(`Nhan Enter de thoat ...`);
readln
end.
a) Đọc và tìm hiểu ý nghĩa của từng câu lệnh. Dịch chương trình và sửa lỗi, nếu có. Chạy chương trình với các bộ dữ liệu được gõ từ bàn phím và kiểm tra kết quả nhận được.
b) Viết lại chương trình bằng cách sử dụng câu lệnh for…do thay cho câu lệnh while…do.
4 - CỦNG CỐ (3’)
- Biết được các hoạt động lặp với số lần chưa biết trước
- Biết sử dụng câu lệnh while..do
5 - HƯỚNG DẪN VỀ NHÀ (2’)
- Về nhà xem lại bài học tiết sau chúng ta học tiếp.
IV. RÚT KINH NGHIỆM :
……………………………………………………………………………………………………………………………………………………………………………………………………
…………………………………………………………………………………………………
*****(((*****
Tiết 51
Bài thực hành 6: Sử dụng lệnh lặp while...do (T1)
I - MỤC TIÊU
1. Kiến thức
- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước.
2. Kỹ năng
- Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh.
3. Thái độ: Nghiêm túc, tích cực.
II. CHUẨN BỊ
1. Giáo viên: giáo án, máy chiếu
2. Học sinh: Kiến thức cũ, sách, vở.
III - PHƯƠNG PHÁP
- Thuyết trình, giảng giải, vấn đáp.
IV - TIẾN TRÌNH LÊN LỚP
1 - ỔN ĐỊNH (1’)
2 - KIỂM TRA BÀI CŨ (3’)
- Hãy cho một số ví dụ về lặp với số lần chưa biết trước.
3 - BÀI MỚI (38’)
HOẠT ĐỘNG CỦA GV VÀ HS
NỘI DUNG KIẾN THỨC
GV: Đưa ra bài tập 1 SGK
? Gọi học sinh nêu ý tưởng
- GV hướng dẫn
HS: Làm bài tập
Bài 1. Viết chương trình sử dụng lệnh lặp While…do để tính trung bình n số thực x1, x2, x3,..., xn. Các số n và x1, x2, x3,..., xn được nhập vào từ bàn phím.
Ý tưởng: Sử dụng một biến đếm và lệnh lặp While…do để nhập và cộng dần các số vào một biến kiểu số thực cho đến khi nhập đủ n số.
a) Mô tả thuật toán của chương trình, các biến dự định sẽ sử dụng và kiểu của chúng.
b) Gõ chương trình sau đây và lưu chương trình với tên Tinh_TB:
Program Tinh_Trung_binh;
uses crt;
Var
n, dem: Integer;
x, TB: real;
begin
clrscr;
dem:=0 ; TB:=0 ;
write(`Nhap so cac so can tinh n = `); readln(n);
while dem
dem:=dem+1;
write(`Nhap so thu `,dem,`= `); readln(x);
TB:=TB+x;
end;
TB:=TB/n;
writeln(`Trung binh cua `,n,` so la = `,TB:10:3);
writeln(`Nhan Enter de thoat ...`);
readln
end.
a) Đọc và tìm hiểu ý nghĩa của từng câu lệnh. Dịch chương trình và sửa lỗi, nếu có. Chạy chương trình với các bộ dữ liệu được gõ từ bàn phím và kiểm tra kết quả nhận được.
b) Viết lại chương trình bằng cách sử dụng câu lệnh for…do thay cho câu lệnh while…do.
4 - CỦNG CỐ (3’)
- Biết được các hoạt động lặp với số lần chưa biết trước
- Biết sử dụng câu lệnh while..do
5 - HƯỚNG DẪN VỀ NHÀ (2’)
- Về nhà xem lại bài học tiết sau chúng ta học tiếp.
IV. RÚT KINH NGHIỆM :
……………………………………………………………………………………………………………………………………………………………………………………………………
…………………………………………………………………………………………………
*****(((*****
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: Trần Hữu Quyết
Dung lượng: 41,50KB|
Lượt tài: 1
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)