Tiet 15 On tap

Ngôn ngữ dùng để viết các chương trình máy tính.. Ngôn ngữ dùng để viết các chương trình máy tính.[r]

(1)

(2)

Kiểm tra: 10p

Kiểm tra: 10p  Đề 1:Đề 1:

1 Biến gì? Nêu

CTTQ? Cho ví

du?

2 Tìm lỗi sai

sửa lại cho đúng

a) var start,

begin: real;

b) const x:=3,14;

 Đề 2Đề 2

1 Hằng gì?

Nêu CTTQ? Cho

ví dụ?

2 Tìm lỗi sai

sửa lại cho đúng

a) var a:=5;

b) const c:=3;

(3)

BÀI GIẢNG TIN HỌC BÀI GIẢNG TIN HỌC

(lớp 8) (lớp 8)

TiTiết 15: Ôn ết 15: Ôn

(4)

I LÝ THUYẾT I LÝ THUYẾT 1.Ngôn ngữ lập trình gì?

1.Ngơn ngữ lập trình gì?

Ngơn ngữ dùng để viết chương trình máy tính

được gọi ngơn ngữ lập trình.

2.Cấu trúc chung chương trình gồm gì?

2.Cấu trúc chung chương trình gồm gì? Gồm:

Gồm:

+ Phần khai báo: thường gồm câu lậnh dùng để

khai báo : tên chương trình, thư viện khai

báo khác

+Phần thân : gồm có câu lệnh máy tính cần thực

hiện

(5)

3.Từ khóa gì? Tên gì? Cho ví dụ? 3.Từ khóa gì? Tên gì? Cho ví dụ?

- Từ khố từ mà ngơn ngữ lập trình - Từ khố từ mà ngơn ngữ lập trình

đã quy định dùng với ý nghĩa chức đã quy định dùng với ý nghĩa chức

xác định. xác định.

VD: Program, begin, end.VD: Program, begin, end.

- Tên người lập trình tự đặt sử - Tên người lập trình tự đặt sử

dụng kí tự mà ngơn ngữ lập trình dụng kí tự mà ngơn ngữ lập trình

cho phép, tên không trùng với từ cho phép, tên không trùng với từ

khoá. khoá.

VD: Tamgiac, Ban_Kinh VD: Tamgiac, Ban_Kinh

4 Các kiểu liệu học? 4 Các kiểu liệu học?

4 kiểu liệu Pascal:4 kiểu liệu Pascal:

Integer Real Char string Integer Real Char string byte

byte

(6)

Kí hiệu

Phép tốn Kiểu liệu

- Trừ Integer, real

* nhân Integer, real

/ chia Integer, real

+ Cộng Integer, real

div Chia lấy phần

nguyên Integer

mod Chia lấy phần dư Integer

(7)

6 Các phép so sánh?

6 Các phép so sánh? Các phép

so sánh ( toán học)Kí hiêu Kí hiêu( Pascal) Ví dụ(tốn học)

Ví dụ ( Pascal)

Bằng = = 5=5 5=5

Khác ≠ <> 4≠3 4<>3 Nhỏ hơn < < 3<5 3<5 Lớn hơn > > 9>7 9>7

Lớn

bằng ≥ >= 8 ≥ 7 8 >= 7 Nhỏ hơn

(8)

7 Biến gì? Cách khai báo nào? 7 Biến gì? Cách khai báo nào?

Cho ví

Cho ví dụ?dụ?

- Cú pháp khai báo biến: - Cú pháp khai báo biến:

Var <danh sách biến> : <kiểu liệu>;

VD:VD:

Var so_nguyen : integer;

Var S, chieu_dai, chieu_rong : real;

Var ten : string;

(9)

8 Hằng gì? Cách khai báo nào? 8 Hằng gì? Cách khai báo nào?

Cho ví dụ? Cho ví dụ?

 Khai báo:Khai báo: const tên hằng= giá trị hằng;const tên hằng= giá trị hằng;

VD: const pi=3.14;VD: const pi=3.14;

(10)

Bài

 Tìm chỗ sai lệnh khai báo sau Tìm chỗ sai lệnh khai báo sau

và gõ lại cho đúng: và gõ lại cho đúng:

a) var start, begin: real; a) var start, begin: real; →

→ var start, batdau: real;var start, batdau: real;

b) const x : =3.14; y:=1000; b) const x : =3.14; y:=1000; →

→ const x = 3.14; y =1000;const x = 3.14; y =1000;

c) var a:=5;c) var a:=5; →

→ const a=5;const a=5;

d)const ten lop = '8A 2'; d)const ten lop = '8A 2'; →

(11)

Bài 2

Bài 2: Chương trình Pascal viết để tính chu vi diện tích hình trịn với bán kính nhập từ bàn phím:: Chương trình Pascal viết để tính chu vi diện tích hình trịn với bán kính nhập từ bàn phím: Program Hinh_tron;

Program Hinh_tron;

var ban_kinh, chuvi, dien_tich: real;

const pi =3.14;

Begin

write(' Cho biết bán kính:'); readln( ban_kinh);

Chu_vi:=2*Pi*ban_kinh; Chu_vi:=2*Pi*ban_kinh; dien_tich:= Pi*ban_kinh*ban_kinh; dien_tich:= Pi*ban_kinh*ban_kinh; writeln('C=',chu_vi,'S=',dien_tich) writeln('C=',chu_vi,'S=',dien_tich) readln readln end end

Hãy phân biệt biển chương trình bẳng cách đánh dấu váo bảng sau

Hằng

(12)

Bài 2

Bài 2: Chương trình Pascal viết để tính chu vi diện tích hình trịn với bán kính nhập : Chương trình Pascal viết để tính chu vi diện tích hình trịn với bán kính nhập

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

Chu_vi:=2*Pi*ban_kinh;

dien_tich:= Pi*ban_kinh*ban_kinh;

writeln('C=',chu_vi,'S=',dien_tich)

readln

end

Hằng

Hằng BiếnBiến Không phải biếnKhông phải biến Pi

Pi xx

3.14

ban_kinh

chuvi

(13)

Bài 2

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

Chu_vi:=2*Pi*ban_kinh; Chu_vi:=2*Pi*ban_kinh; dien_tich:= Pi*ban_kinh*ban_kinh; dien_tich:= Pi*ban_kinh*ban_kinh; writeln('C=',chu_vi,'S=',dien_tich) writeln('C=',chu_vi,'S=',dien_tich) readln readln end end Hằng

Pi xx 3.14

(14)

Bài 2

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

readln

end

Hằng

Pi xx 3.14

3.14 xx ban_kinh

ban_kinh xx chuvi

(15)

Bài 2

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

Pi xx 3.14

3.14 xx ban_kinh

ban_kinh xx chuvi

chuvi xx dien_tich

dien_tich

2

(16)

Bài 2

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

readln

end

Hằng

Pi xx 3.14

3.14 xx ban_kinh

ban_kinh xx chuvi

(17)

Bài 2

từ bàn phím:

Program Hinh_tron;

const pi =3.14;

Begin

Pi xx 3.14

3.14 xx ban_kinh

ban_kinh xx chuvi

chuvi xx dien_tich

dien_tich xx 2

(18)

Bài 3: Hãy liệt kê lỗi chương trình

Pascal sửa lại cho đúng.

const Pi:=3.1416; const Pi:=3.1416; Var cv, dt: integer Var cv, dt: integer

r:real; r:real; Begin

Begin

r=5.5; r=5.5;

cv:=2*Pi*r; cv:=2*Pi*r;

dt=pi*r*r; dt=pi*r*r;

writeln('Chu vi là:=cv'); writeln('Chu vi là:=cv');

writeln(' dien tich la:=dt'); writeln(' dien tich la:=dt');

(19)

S

Sửa lại:ửa lại:

Program baitap; Program baitap;

const Pi=3.1416; const Pi=3.1416;

Var cv, dt, r : real; Var cv, dt, r : real;

Begin Begin

r=5.5; r=5.5;

cv:=2*Pi*r; cv:=2*Pi*r;

dt:=pi*r*r; dt:=pi*r*r;

writeln('Chu vi là:= ', cv ); writeln('Chu vi là:= ', cv );

writeln( ' dien tich la:= ' , dt ); writeln( ' dien tich la:= ' , dt );

readln readln end.

(20)

Bµi 4

Hãy viết ch ơng trình để giải tốn sau:

Tính diện tích S tam giác với độ dài cạnh a chiều cao t ơng ứng h ?(a h số tự nhiên đ ợc nhập từ bàn phím )

Tht to¸n: 1

2

S  ah h

a

Hoạt động nhóm Hoạt động nhóm

(21)

Program: Dientich tamgiac Dientich tamgiac

Var a, h: Interger; a, h: Interger;

Const b:=2; b:=2; Begin

Wrile(‘Nhap canh a: ’);

Readln(a);

Write(‘Nhap chieu cao h: ’);

Readln(h);

S:=a.h/b;

Writeln(Dien tich hinh tam giac la: ’,S);

Readln;

End

(22)

Program Dientichtamgiac; Dientichtamgiac; Var a, h: Integer; a, h: Integer;

S: Real;

Const b=2; b=2; Begin

Write(‘Nhap canh a: ’);

Readln(a);

Write(‘Nhap chieu cao h: ’);

Readln(h);

S:=a*h/b;

Writeln(‘Dien tich hinh tam giac la: ’,S);

(23)

Ngày 20 tháng 10 năm 2010

Định dạng
Số trang	23
Dung lượng	2,09 MB