- Hiểu cách khai báo biến, hằng - Biết cách sử dụng biến trong chương trình và sử dụng được lệnh gán giá trị cho biến.. Kĩ năng: Viết được các chương trình Pascal đơn giản 3.[r]
Trang 1Ngày soạn: 17/10/2009
Tu ần 9:
I MỤC TIÊU:
1 Kiến thức:
-
- cách khai báo
-
2 Kĩ năng:
. các ( trình Pascal ( 0
3 Thái độ:
- Ham thích môn
- Tích 3 45
II PHƯƠNG PHÁP:
III CHUẨN BỊ:
1 Giáo viên:
- SGK, tài +, giáo án
- ;< dùng &>? @ máy vi tính
2 Học sinh:
-
- SGK, < dùng 45@ máy vi tính
IV TIẾN TRÌNH LÊN LỚP:
1 Ổn định lớp
2 Bài mới:
Hoạt động 1: Ôn lại kiến thức trọng tâm để học
sinh làm bài tập
Gv: # là > + nào?
Hs:
Gv: Hãy nêu cú pháp khai báo C
Hs:
Gv: Hãy nêu cú pháp khai báo C
Hs:
1 Lý thuyết:
- # và là các > +
I nguyên trong $ L quá trình
- # và 50 khai báo + Cú pháp khai báo @
Var <danh sách biến>:<kiểu dữ
Trang 2Gv: Nêu các thao tác 3 , A các C
Hs:
Gv: Câu +, gán có &> nào? Kí ,
phép gán trong ngôn I Pascal?
Hs:
Gv:
Hs:
Gv: Cho Hs ghi bài
Hoạt động 2: Sửa bài tập trong Sgk, làm một số
bài tập áp dụng
Gv: Yêu R Hs S bài 5 trang 33 Sgk
Hs: ; bài
Gv: Hãy +, kê các +V W có)? Và nêu cách $%
+> cho G
Hs:
Hs:
Gv: Hãy +> ( trình G
Cho 1 em lên 0 +> ( trình G
\A +A5 vào 0 5' theo nhóm
Hs: 3 ,
Hs:
Gv: Thu bài làm 3 nhóm P +P?
! tra ,
Gv: Cho Hs quan sát ( trình G 4 xét
bài làm trên 0 các nhóm 3 P chéo
Gv: Cho Hs ( trình G vào B
liệu>;
+ Cú pháp khai báo @
Const tên_hằng = giá trị;
- Các thao tác 3 , A các
là: gán giá giá
- JP trúc +, gán:
Tên biến:= Biếu thức cần gán giá trị cho biến ;
-
Readln (Tên biến) ;
-
Write (Ten biến);
"H@ Writeln(Tên biến);
2 Bài tập:
Bài 1: Bài 5 trang 33/Sgk.
Viết lại chương trình đúng:
Var a : integer;
b : real;
Const c = 3;
Begin
a := 200;
b := a/c;
Trang 3Hs: Gõ ( trình lên máy, &- và >? (
trình
Gv: A &c Hs ( trình
Gv: Nêu công d tính &, tích S tam giác?
Hs: S = (a * h) / 2
Gv:
Hs:
Gv: câu +, 45 > a và D cao h?
Hs:
Gv: câu +, gán tính S?
Hs: Lên 0
Hs:
Gv: câu +, in S ra màn hình?
Hs:
Hs:
Gv:
vào B
Hs: Gõ ( trình vào máy, &- và >?
( trình
Gv: Kí , phép chia +P? 5R nguyên và kí
, phép chia +P? 5R & là gì?
Hs:
Gv:
Hs:
Gv:
Hs:
Gv: câu +, in c và d ra màn hình?
Hs: Lên 0
write (b);
readln End
Bài 2: Viết chương trình.
a Tính &, tích S hình tam giác
A j dài j > a và S cao
( d h (a và h là các $L 3 nhiên
45 vào k bàn phím)
b Tính ! 6 0 c phép chia +P?
5R nguyên và ! 6 0 d phép chia +P? 5R & hai $L nguyên a
và b
Program dien_tich_tamgiac;
Var a, h : integer;
S : real;
Begin Write(‘nhap canh a va chieu cao h:’);
Readln(a, h);
S := (a * h) / 2;
Writeln(‘Dien tich tam giac S = ’,
S:4:3);
Readln End
Trang 4Gv: A &c cho Hs ( trình hoàn
g
Hs: Gõ ( trình vào máy, &- và >?
( trình Cho ! 6 0 khi a = 7, b = 4
Program tinh_toan;
Var a, b, c, d : integer;
Begin Write(‘nhap a, b:’);
Readln(a, b);
c := a div b;
d := a mod b;
write (‘ket qua phep chia lay phan
nguyen c = ‘,c);
write (‘ket qua phep chia lay phan
du d = ‘,d);
readln End
3 C ủng cố:
4 Dặn dò:
- S nhà bài, 3 hành
- Coi +> bài k bài 1 bài 4 s - cho bài ! tra 1
Rút kinh ,@
... BỊ:
1 Giáo viên:
- SGK, tài +, giáo án
- ;< dùng &>? @ máy vi tính
2 Học sinh:
-
- SGK, < dùng ...
là: gán giá giá
- JP trúc +, gán:
Tên biến:= Biếu thức cần gán giá trị cho biến ;
-
Readln (Tên biến) ;
-
Write... class="page_container" data-page="2">
Gv: Nêu thao tác 3 , A C
Hs:
Gv: Câu +, gán có &> nào? Kí ,
phép gán ngôn I Pascal?
Hs: