5. Rỳt kinh nghiệm:
... ... ...
Tuần: 12 Ngày soạn: 4/11/2012
Tiết: 24 Ngày giảng: 8/11/2012
BÀI TẬPI. Mục tiờu: I. Mục tiờu:
1. Kiến thức:
- Biết sử dụng kiến thức đó học để viết một số chương trỡnh đơn giản
2. Kĩ năng:
- Rốn luyện kĩ năng sửa lỗi một số chương trỡnh đơn giản
3. Thỏi độ:
- Thỏi độ học tập nghiờm tỳc, yờu thớch bộ mụn
II. Chuẩn bị:
- GV: SGK, giỏo ỏn, một số bài tập tham khảo - HS: Học kỹ lý thuyết, làm cỏc bài tập trong SGK.
III. Phương phỏp:
- Đặt vấn đề, đưa ra bài tập để học sinh trao đổi, thảo luận và làm. - Gv quan sỏt, hướng dẫn, nhận xột cụng việc của học sinh.
IV. Tiến trỡnh dạy và học:1. Ổn định lớp 1. Ổn định lớp
2. Kiểm tra sự chuẩn bị của học sinh.3. Nội dung bài tập: 3. Nội dung bài tập:
Bài 1: Hóy chỉ ra lỗi và sửa lỗi trong chương trỡnh sau : Const pi:=3.1416; Var cv,dt:integer R:real; Begin R=5.5 Cv=2*pi*r; Dt=pi*r*r; Writeln(‘chu vi la:= cv’); Writeln(‘dien tich la:=dt’); Readln
End.
Bài 2: Viết chương trỡnh tớnh diện tớch S của hỡnh tam giỏc với độ dài một cạnh a và chiều cao tương ứng h (a và h là cỏc số tự nhiờn được nhập vào từ bàn phớm).
* Chương trỡnh:
Program tinhtoan; Uses crt;
Var a,h : interger; S : real; Begin
Write(‘Nhap canh dai và chieu cao :’); Readln (a,h);
S:=(a*h)/2;
Writeln(‘ Dien tich hinh tam giac la :’,S:5:1); Readln
End.
Bài 3: Viết chương trỡnh tớnh kết quả c của phộp chia lấy phần nguyờn và kết quả d của phộp chia lấy phần dư của hai số nguyờn a và b.
* Chương trỡnh:
Program tinhtoan; Uses crt;
Var a,b,c,d : integer; Begin
Write(‘Nhap hai so a,b :’); Readln (a,b); c:=a div b; d:=a mod b;
Writeln(‘ Phan nguyen cua a va b la :’,c); Writeln(‘ Phan du cua a va b la :’,d); Readln
End.
4. Dặn dũ: