Tiết 32: Bài thực hành số 4 (tt)

Một phần của tài liệu GIAO AN TIN LOP 8 THEO CKT (Trang 60 - 61)

- Rèn kĩ năng ban đầu về đọc các chương trình đơn giản và hiểu được ý nghĩa của thuật toán sử dụng trong chương trình

Tiết 32: Bài thực hành số 4 (tt)

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF...THEN

I. Mục tiêu:1. Kiến thức: 1. Kiến thức:

- Luyện tập sử dụng câu lệnh If...then 2. Kĩ năng:

- Rèn kĩ năng ban đầu về đọc các chương trình đơn giản và hiểu được ý nghĩa của thuật toán sử dụng trong chương trình

3. Thái độ:

- Thái độ học tập nghiêm túc, yêu thích môn học.

II. Chuẩn bị:

Nội dung bài thực hành, máy tính điện tử.

III. Tiến trình thực hành:

T/g Hoạt động của thầy Hoạt động của trò Nội dung

19p + Hoạt động 1: Làm bài tập 2/53

- Viết chương trình nhập chiều cao của hai bạn Long và Trang, in ra màn kết quả so sánh chiều cao của 2 bạn. - Yêu cầu học sinh viết và gõ chương trình vào máy.

+ Học sinh chú ý lắng nghe. + Viết và gõ chương trình vào máy.

Program Ai_cao_hon; Var long, trang: real; Begin

Writeln(‘ nhap chieu cao cua Long’); Readln(long);

Writeln(‘nhap chieu cao cua Trang’); Readln(trang);

If long>trang then

Writeln(‘bạn Long cao hon’); If Long<trang then

Writeln(‘ban Trang cao hon’) else

1. Ôn lại câu lệnh điều kiện: kiện:

19p + Hoạt động 2: Làm bài tập 3/53

- Dưới đây là chương trình nhập ba số dương a, b, c từ bàn phím, kiểm tra và in ra màn hình kết quả kiểm tra ba số đó có thể là độ dài các cạnh của một tam giác hay không.

- Tìm hiểu ý nghĩa của các câu lệnh trong chương trình. - Dịch và chạy chương trình

+ Gõ chương trình vào máy. Program ba_canh_tam_giac; Var a,b,c: real;

Begin

Write(‘nhap ba so a, b và c:’); Readln(a,b,c);

If (a+b>c) and (b+c>a) and (c+a>b) then

Writeln(‘a,b,c là ba cạnh của tam giác’) else

Writeln(‘a,b,c khong la ba canh cua tam giac’);

Readln; End.

+ Học sinh tìm hiểu ý nghĩa của các câu lệnh trong chương trình theo yêu cầu của giáo viên.

+ Nhấn F9 để dịch và nhấn Ctrl + F9 để chạy chương trình.

program sapxep; uses crt;

var a,b : integer ; begin clrscr ; write(‘ nhap so a : ‘) ; readln(a); write(‘ nhap so b : ‘) ; readln(b) ; if a < b then write(a,’ ‘,b) else writeln(b,’ ‘,a) ; readln ; IV. Nhận xét (5 phút)

Giáo viên nhận xét và đánh giá tiết thực hành.

V. Dặn dò: (2 phút)

- Về nhà xem lại bài, tiết sau làm bài tập

------

Một phần của tài liệu GIAO AN TIN LOP 8 THEO CKT (Trang 60 - 61)

Tải bản đầy đủ (DOC)

(125 trang)
w