Bài giảng tin học 8 - Kiểm tra 1 tiết thực hành
2018-10-06T13:12:18-04:00
2018-10-06T13:12:18-04:00
Bài giảng tin học 8 - Kiểm tra 1 tiết thực hành
/themes/cafe/images/no_image.gif
Bài Kiểm Tra
https://baikiemtra.com/uploads/bai-kiem-tra-logo.png
Thứ bảy - 06/10/2018 13:12
Bài giảng tin học 8 - Kiểm tra 1 tiết thực hành
KIỂM TRA 1 TIẾT (TH)
I. MỤC TIÊU :
1. Kiến thức:
- Kiểm tra kiến thức về câu lệnh lặp For...To...Do..., While...Do...
2. Kĩ năng:
- Viết đúng cú pháp câu lệnh lặp For...To...Do..., While...Do...
- Viết được chương trình với câu lệnh lặp For...To...Do..., While...Do...
3. Thái độ:
- Giáo dục thái độ học tập nghiêm túc, tự lực
II. CHUẨN BỊ :
1. Giáo viên :
- Đề kiểm tra, KHDH
2. Học sinh :
- Kiến thức bài cũ
III. TIẾN TRÌNH LÊN LỚP :
1. Ổn định tổ chức lớp :
- Kiển tra sĩ số :
- Ổn định trật tự :
2. Kiểm tra bài cũ:
3. Kiểm tra :
Hoạt động của gv và hs |
Nội dung |
Hoạt động 1: phát đề kiểm tra |
GV phát đề KT cho HS
HS nhận đề KT |
|
Hoạt động 2: HS làm bài |
HS làm bài kiểm tra
GV quan sát và nhắc nhở HS làm bài nghiêm túc |
KIỂM TRA MỘT TIẾT
|
Hoạt động 3: Giáo viên chấm điểm |
- GV chấm điểm bài làm của HS theo đáp án |
|
ĐỀ
Viết chương trình nhập vào một số nguyên n (2 ≤ n ≤ 10) từ bàn phím và thực hiện các yêu cầu sau:
a) Dùng câu lệnh lặp For...To...Do... để hiển thị bảng nhân n
VD: n = 5
5 x 1 = 5
5 x 2 = 10
......
5 x 10 = 50
b) Dùng câu lệnh lặp While để tính S và P theo công thức và hiển thị kết quả ra màn hình
S = 1 + 2 +...+ n
P = 1 x 2 x...x n
HƯỚNG DẪN CHẤM
- Viết đúng cấu trúc chương trình : 1 điểm
- Khai báo đúng đủ các biến n, i, S, P : 2 điểm
- Dùng được lệnh write và readln để nhập được giá trị cho n :1 điểm
- Hiển thị được bảng nhân : 2 điểm
- Tính được S bằng câu lệnh While : 1,5 điểm
- Tính được P bằng câu lệnh While : 1,5 điểm
- Xuất được kết quả S ra màn hình : 0.5 điểm
- Xuất được kết quả P ra màn hình : 0.5 điểm
ĐÁP ÁN
Program Chuong_trinh_tong_hop;
Uses CRT;
Var i,n,S,P: Integer;
Begin
Clrscr;
Write(‘Nhap n (2<=n<=10)’);
Readln(n);
For i:=1 to 10 do writeln(n,’ x ‘,i,’ = ‘, n*i);
1:=1; S:=0; P:=1
While i<=n do
Begin
S:=S+i;
P:=P*i;
I:=i+1;
End;
Writeln(‘S = ‘, S);
Writeln(‘P = ‘, P);
Readln;
End.
Viết chương trình nhập vào 1 số n
- xuất ra các ước lẻ của n
-tính tổng các ước lẻ đó