- Cỏch khai bỏo đơn giản một biến mảng trong ngụn ngữ
1. Củng cố: Chỉ ra những khiếm khuyết mà học sinh cũn mắc phải, yờu cầu khắc phục
2. Hướng dẫn về nhà: về nhà xem trước bài thực hành
Tuần: 31 Tiết: 61 Ngày Soạn: 26/3/2015 Ngày dạy : 1/4/2015
Bài thực hành số 7
XỬ Lí DÃY SỐ TRONG CHƯƠNG TRèNH I. MỤC TIấU CẦN ĐẠT
1. Kiến thức:
- Làm quen với việc khai bỏo và sử dụng biến mảng. - ễn luyện cỏch sử dụng cõu lệnh lặp for..do
2. Kĩ năng:
- Củng cố cỏc kĩ năng đọc hiểu và chỉnh sửa chương trỡnh. 3. Thỏi độ:
- Thỏi độ học tập nghiờm tỳc, yờu thớch viết chương trỡnh để thực hiện một số cụng việc.
II. CHUẨN BỊ CỦA GIÁO VIấN VÀ HỌC SINH
1. Sỏch giỏo khoa, giỏo ỏn. 2. Đọc bài trước ở nhà.
III. TỔ CHỨC HOẠT ĐỘNG DẠY VÀ HỌC1. Ổn định lớp 1. Ổn định lớp
2. Kiểm tra bài cũ
3. Bài mới
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRề NỘI DUNG
Hoạt động 1: Tỡm hiểu Bài 1 (21 phỳt)
Chương trỡnh tỡm giỏ trị nhỏ nhất trong dĩy số nguyờn
P_Min ? Program P_Min; Var i, n, Min : integer; A: array[1..100] of integer; Chương trỡnh tỡm giỏ trị nhỏ nhất trong dĩy số nguyờn P_Min ?
HS chia nhúm làm thực hành.
Begin
write('Hay nhap do dai cua day so, N='); readln(n);
writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do Begin write('a[',i,']='); readln(a[i]); End; Min:=a[1];
for i:=2 to n do if Min>a[i]
then Min:=a[i];
write('So nho nhat la Min =',Min); readln;
End.
Hoạt động 2: Tỡm hiểu Bài tập 2 (22 phỳt)
Viết chương trỡnh nhập điểm của cỏc bạn trong lớp. Sau đú in ra màn hỡnh số bạn đạt kết quả học tập loại giỏi, khỏ, TB và kộm. Tiờu chuẩn: - Loại giỏi: 8.0 trở lờn - Loại khỏ: 6.5 đến 7.9 - Loại TB: 5.0 đến 6.4 - Loại kộm: dưới 5.0 HS chia nhúm làm thực hành. GV gợi ý: - Dựng cõu lệnh if…then… Program Phan_loai; uses crt; Var i, n, G, Kh, TB, K: integer; A: array[1..100] of real; Begin clrscr;
write('nhap so HS trong lop, n= '); readln(n); writeln('Nhap diem :'); For i:=1 to n do Begin write(i,' . '); readln(a[i]); End; G:=0; Kh:= 0; TB:= 0; K:= 0; for i:=1 to n do Begin if a[i] >= 8.0 then G:= G + 1; if a[i] <5.0 then K:= K + 1;
if (a[i] <8.0 ) and (a[i] >=6.5) then Kh:= Kh + 1;
if (a[i] >= 5 ) and (a[i] < 6.5)
Viết chương trỡnh nhập điểm của cỏc bạn trong lớp. Sau đú in ra màn hỡnh số bạn đạt kết quả học tập loại giỏi, khỏ, TB và kộm. Tiờu chuẩn: - Loại giỏi: 8.0 trở lờn - Loại khỏ: 6.5 đến 7.9 - Loại TB: 5.0 đến 6.4 - Loại kộm: dưới 5.0
then TB:= TB + 1;
end;
writeln(' Ket qua hoc tap: '); writeln(G, ' ban hoc gioi '); writeln(Kh, ' ban hoc kha '); writeln(TB, ' ban hoc trung binh');
writeln(K, ' ban hoc kem '); readln;
End.
IV. CỦNG CỐ VÀ HƯỚNG DẪN VỀ NHÀ (2 phỳt) 1. Củng cố: đỏnh giỏ giờ thực hành.
2. Hướng dẫn về nhà: về nhà xem tiếp phần cũn lại
Tuần: 31 Tiết: 62 Ngày Soạn: 26/3/2015 Ngày dạy : 1/4/2015
Bài thực hành số 7 (tt)
XỬ Lí DÃY SỐ TRONG CHƯƠNG TRèNH
I. MỤC TIấU CẦN ĐẠT
1. Kiến thức:
- Làm quen với việc khai bỏo và sử dụng biến mảng. - ễn luyện cỏch sử dụng cõu lệnh lặp for..do
2. Kĩ năng:
- 1. Củng cốcỏc kĩ năng đọc hiểu và chỉnh sửa chương trỡnh.
3. Thỏi độ:
- Thỏi độ học tập nghiờm tỳc, yờu thớch viết chương trỡnh để thực hiện một số cụng việc.
II. CHUẨN BỊ CỦA GIÁO VIấN VÀ HỌC SINH
- GV: SGK, giỏo ỏn, tài liệu tham khảo
- Chuẩn bị phũng thực hành đủ số mỏy hoạt động tốt - HS: Học kỹ lý thuyết, đọc trước bài thực hành