Chọn địa điểm muốn tìm nhật thực 2 Thực hiện lệnh View → Eclipse.

Một phần của tài liệu Giáo án tin học lớp 8 HKI (Trang 48 - 56)

- Thực hiện lệnh Options → Anchor Time To và chọn mục Sunrise để tìm

1.Chọn địa điểm muốn tìm nhật thực 2 Thực hiện lệnh View → Eclipse.

2. Thực hiện lệnh View → Eclipse.

e. Quan sát sự chuyển động của thời gian

- GV hướng dẫn cho HS làm

- Để thời gian chuyển động hãy nháy chuột vào nút . Muốn dừng hãy nháy chuột vào nút .

HS thực hiện cỏc thao tỏc trờn mỏy tớnh. HS thực hiện trờn mỏy tớnh và quan sỏt kết quả HS suy nghỉ và thực hiện thao tỏc. HS quan sỏt trờn màn hỡnh. HS thực hiện cỏc thao tỏc trờn mỏy tớnh. HS thực hiện trờn mỏy tớnh và quan sỏt kết quả V. Củng cố: Phần mềm Sun Times dựng để làm gỡ?

VI. Dặn dũ – Hướng dẫn về nhà:

Xem lại cỏc bước thực hiện phần mềm

VII. Rỳt kinh nghiệm tiết dạy:

Duyệt của Tổ Trưởng Duyệt của Ban Giỏm Hiệu

Tiết 30 Tuần 15

Tờn bài dạy: BÀI TẬP

I. Mục tiờu bài dạy:

• Viết đợc đợc câu lệnh điều kiện if ... then … else … trong chơng trình;

• Rèn luyệ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.

II. Chuẩn bị:

• GV: SGK, giỏo ỏn, phũng mỏy.

• HS: Học bài, Xem bài thực hành 3

III. Kiểm tra bài cũ:

Viết chương trỡnh nhập vào 2 số nguyờn, in 2 số đú ra màn hỡnh theo thứ tự tăng dần.

IV. Hoạt động dạy và học:

HOẠT ĐỘNG GIÁO VIấN HĐ HỌC SINH NỘI DUNG

HĐ1: Hướng dẫn HS làm bài tập 1 - GV cho HS ghi bài tập vào vở và cho HS suy nghỉ cỏch viết chương trỡnh. - Cỏc em xem bài tập này INPUT và OUTPUT như thế nào?

- Cỏch khai bỏo biến: ta phải khai bỏo mấy biến?

- Trước hết cỏc em xột điều kiện kho nhập số bằng 0. Vậy số 0 là số chẳn hay số lẻ

- Số chẳn là số như thế nào? Cỏch viết trong chương trỡnh Pascal?

- Cho HS suy nghỉ ớt phỳt để viết chương trỡnh.

- GV trỡnh bày chương trỡnh của mỡnh cho HS thực hiện, biờn dịch và chạy chương trỡnh.

HS viết vào vở tõp. HS suy nghỉ và trả lời HS khai bỏo biến var a: integer; HS trả lời số 0 là số khụng chẳn cũng khụng lẻ. HS viết cõu lệnh: if A mod 2 = 0 then writeln(A,' la so chan ') else writeln(A,' la so le);

Bài 1:Viết chương trỡnh nhập

vào 1 số nguyờn a từ bàn phớm và in số đú ra màn hỡnh với thụng tin số đú là số chẳn hay số lẻ program ChanLe; uses crt; var A: integer; begin clrscr; write('Nhap so A: '); readln(A); if A = 0 then write(A,’la so khong chan cung khong le’)

else if A mod 2 = 0 then writeln(A,' la so chan ') else writeln(A,' la so le); readln; end. HĐ2: Hướng dẫn HS làm bài tập 2 - GV cho HS ghi bài tập vào vở và cho HS suy nghỉ cỏch viết chương trỡnh. (adsbygoogle = window.adsbygoogle || []).push({});

HS chỳ ý lắng nghe và viết vào tập.

Bài 2: Viết chương trỡnh nhập

- Cỏc em xem bài tập này INPUT và OUTPUT như thế nào?

- Cỏch khai bỏo biến: ta phải khai bỏo mấy biến?

- GV: Cỏc em thực hiện phộp gỡ để in ra số lớn nhất?

- Thực hiện phộp so sỏnh nếu A> B thỡ em in ra màn hỡnh giỏ trị của biến A hay giỏ trị của biến B?

- Cho HS viết chương trỡnh trờn mỏy tớnh và chạy chương trỡnh.

- Kiểm tra và sửa lỗi chương trỡnh.

HS khai bỏo 2 biến A và biến B cú kiểu dữ liệu số nguyờn: var A,B: integer; if A > B then writeln(A) else writeln(B); Viết chương trỡnh và chạy chương trỡnh. phớm và in ra 1 số lớn nhất trong 2 số vừa nhập. program Lon; uses crt; var A: integer; begin clrscr; write('Nhap so A: '); readln(A); write('Nhap so B: '); readln(B); if A > B then writeln(A) else writeln(B); readln; end. V. Củng cố:

- Cõu lệnh điều kiện dạng đủ?

- Viết chương trỡnh nhập vào 2 số nguyờn a và b từ bàn phớm và in ra 1 số nhỏ nhất trong 2 số vừa nhập.

VI. Dặn dũ – Hướng dẫn về nhà:

Xem lại cỏc bài tập và viết lại chương trỡnh

VII. Rỳt kinh nghiệm tiết dạy:

Duyệt của Tổ Trưởng Duyệt của Ban Giỏm Hiệu

Tiết 31 Tuần 16

Tiết 32, 33 Tuần 17

Tờn bài dạy: ễN TẬP HỌC KỲ I

I. Mục tiờu bài dạy:

• Thực hiện đợc khai báo đúng cú pháp, lựa chọn đợc kiểu dữ liệu phù hợp cho biến

• Kết hợp đợc giữa lệnh write(), writeln() với read(). readln() để thực hiện việc nhập dữ liệu cho biến từ bàn phím

• Viết đợc đợc câu lệnh điều kiện if ... then … else … trong chơng trình;

• Rèn luyệ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.

II. Chuẩn bị:

• GV: SGK, giỏo ỏn

• HS: Xem lại cỏc kiến thức đó học HK1

III. Hoạt động dạy và học:

HOẠT ĐỘNG GIÁO VIấN HĐ HỌC SINH NỘI DUNG

HĐ1: Hướng dẫn học sinh bài tập 1:

- Viết cõu lệnh nhập dữ liệu vào 2 biến a và b (adsbygoogle = window.adsbygoogle || []).push({});

Write(‘Nhap so nguyen a = ’); Readln(a);

Writeln(‘Nhap so nguyen b = ’); Readln(b);

- Viết cõu lệnh điều kiện? If a < b then write(a, ‘ ‘ , b) Else write (b, ‘ ‘, a);

- Hoàn chỉnh chương trỡnh và biờn dịch.

HS: Chỳ ý lắng nghe HS viết cõu lệnh để nhập 2 số nguyờn a và b từ bàn phớm

HS viết cõu lệnh điều kiện để in ra màn hỡnh 2 số theo thứ tự tăng dần Hoàn chỉnh chương trỡnh và biờn dịch chương trỡnh.

Bài tập 1: Viết chương trỡnh nhập vào hai số nguyờn a và b từ bàn phớm và in ra màn hỡnh hai số đú theo thứ tự tăng dần

Program bai1;

Var a,b : integer; Begin Write(‘Nhap so nguyen a = ’); Readln(a); Writeln(‘Nhap so nguyen b = ’); Readln(b); If a < b then write(a, ‘ ‘ , b) Else write (b, ‘ ‘, a);

Readln; End.

HĐ2: Hướng dẫn học sinh bài tập 2: HS: Chỳ ý lắng nghe

Bài tập 2 : Viết chương trỡnh nhập vào hai số nguyờn a và b từ

- Viết cõu lệnh nhập dữ liệu vào 2 biến a và b Write(‘Nhap so nguyen a = ’); Readln(a); Writeln(‘Nhap so nguyen b = ’); Readln(b);

- Viết cõu lệnh điều kiện? If a > b then write(a, ‘ ‘ , b) Else write (b, ‘ ‘, a);

- Hoàn chỉnh chương trỡnh và biờn dịch.

HS viết cõu lệnh để nhập 2 số nguyờn a và b từ bàn phớm

HS viết cõu lệnh điều kiện để in ra màn hỡnh 2 số theo thứ tự giảm dần Hoàn chỉnh chương trỡnh và biờn dịch chương trỡnh. bàn phớm và in ra màn hỡnh hai số đú theo thứ tự giảm dần Program bai2;

Var a,b : integer; Begin Write(‘Nhap so nguyen a = ’); Readln(a); Writeln(‘Nhap so nguyen b = ’); Readln(b); If a < b then write(b, ‘ ‘ , a) Else write (a, ‘ ‘, b);

Readln; End.

HĐ3: Hướng dẫn học sinh bài tập 3:

- Viết cõu lệnh nhập dữ liệu vào 2 biến a và b

Write(‘Nhap so nguyen a = ’); Readln(a);

Writeln(‘Nhap so nguyen b = ’); Readln(b);

- Viết cõu lệnh diều kiện để so sỏnh 2 số a và b, nếu số nào nhỏ nhất in ra màn hỡnh.

If a > b then write(b) Else write (a);

- Hoàn chỉnh chương trỡnh và biờn dịch.

HS: Chỳ ý lắng nghe HS viết cõu lệnh để nhập 2 số nguyờn a và b từ bàn phớm

HS viết cõu lệnh điều kiện để in ra màn hỡnh 2 số theo thứ tự tăng dần Hoàn chỉnh chương trỡnh và biờn dịch chương trỡnh.

Bài 3: Viết chương trỡnh nhập

vào hai số nguyờn a và b từ bàn phớm và in ra màn hỡnh số nhỏ nhất trong hai số đú. (adsbygoogle = window.adsbygoogle || []).push({});

Program bai3; Var a,b : integer; Begin Write(‘Nhap so nguyen a = ’); Readln(a); Writeln(‘Nhap so nguyen b = ’); Readln(b); If a > b then write(b) Else write (a); Readln; End.

V. Củng cố:

Cõu lệnh diều kiện?

Xem lại tất cả cỏc bài tập, chuẩn bị thi HK1

VII. Rỳt kinh nghiệm tiết dạy:

Duyệt của Tổ Trưởng Duyệt của Ban Giỏm Hiệu

Tiết 34 Tuần 17

Một phần của tài liệu Giáo án tin học lớp 8 HKI (Trang 48 - 56)