KHAI báo và sử DỤNG BIẾN

Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN1.. Các kiểu dữ liệu trong Pascal... Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN2.. Cách khai báo biến với các kiểu dữ liệu Var : ; Trong đó: + D

Kiểm tra bài cũ

1, Viết cú pháp của cách khai báo biến ? Cho VD Var tên biến : kiểu dữ liệu ;

2, Viết cú pháp của cách khai báo hằng ? Cho VD Const tên hằng = giá trị của hằng ;

Tìm chỗ sai trong các lệnh khai báo sau và sửa lại cho đúng?

a) Var start, begin: real;

b) const x:=3; y:=1000;

c) Var a:=5;

d) Const ten lop = ‘8A 2’;

e) Var xep_loai, diem : integer, real;

Const a=5;

Tên biến chứa dấu cách

Phải khai báo riêng từng kiểu dữ liệu

Chữa bài tập 5 (SGK-T33). Hãy liệt kê các lỗi nếu

có trong chương trình dưới đây và sửa lại cho đúng:

Var a, b := integer;

Const c := 3;

Begin

a := 200

b := a/c;

write(b);

readln End.

=> Var a, b : integer;

=> Const c = 3;

=> a := 200 ;

⇒ Khai báo kiểu dữ liệu của biến b chưa đúng

Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN

1 Các kiểu dữ liệu trong Pascal

Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN

2 Cách khai báo biến với các kiểu dữ liệu

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

Trong đó: + Danh sách biến là 1 hoặc nhiều biến có cùng kiểu dữ liệu, phân cách nhau bởi dấu phẩy (,)

+ Kiểu dữ liệu là một trong các kiểu dữ liệu của Pascal

a)- Khai báo biến

Ví dụ

Var X, Y, a, b : byte;

Var So_nguyen, so_hoa_diem_tot : integer; Var Chieu_cao, can_nang, diem_TBm : real; Var Ho_va_Ten, noi_sinh, : string;

Bài 1 Viết chương trình Pascal có khai báo và sử dụng biến

Bài toán: Một cửa hàng cung cấp dịch vụ bán

hàng thanh toán tại nhà Khách hàng chỉ cần đăng kí số lượng mặt hàng cần mua, nhân viên cửa hàng sẽ trả hàng và nhận tiền thanh toán tại nhà khách hàng Ngoài trị giá hàng hóa, khách hàng còn phải trả thêm phí

tính tiền thanh toán trong trường hợp khách hàng chỉ mua một mặt hàng duy nhất

Ví dụ

Hãy tính tiền khi mua SGK Tin học quyển 3, biết:

- Số lượng: 100 quyển.

- Đơn giá: 18.300/quyển.

- Phí dịch vụ: 5000

100 x 18.300 + 5000

= 1.835.000

=> Tiền thanh toán =

a, Khởi động Pascal Gõ chương trình SGK/35 và tìm hiểu ý nghĩa của từng câu lệnh trong chương trình:

b, Lưu chương trình với tên BaiTH3_8A Dịch và chỉnh sửa các lỗi gõ, nếu có.

{ Cach viet chuong trinh trong SGK}

Program Tinh_tien;

Uses crt;

Var soluong : integer ;

dongia, thanhtien : real ;

thongbao : string ;

Const phi = 10000 ;

Begin

Clrscr ; Thongbao := ‘Tong so tien phai thanh toan la: ’ ;

Writeln(‘Don gia = ’) ; readln(dongia) ; Writeln(‘So luong = ’) ; readln(soluong) ; Thanhtien := soluong * dongia + phi ;

(* In ra so tien phai tra *)

Writeln(thongbao, thanhtien :10:2) ; readln

End.

Program Tinh_tien;

Uses crt;

Var

soluong :

dongia, thanhtien :

Const

Begin

Clrscr ;

Writeln(‘Don gia = ’) ;

Writeln(‘So luong = ’) ;

Thanhtien := soluong * dongia + phi ;

(* In ra so tien phai tra *)

Writeln(‘Tong so tien phai thanh toan la: ‘, ) ;

Readln

Integer ;

real ; phi = 10000 ;

readln(dongia) ; readln(soluong) ;

Bài 1

c, Chạy chương trình với các bộ dữ liệu (đơn giá và số lượng) như sau (1000, 20), (3500, 200), (18500, 123) Kiểm tra tính đúng của các kết quả in ra.

d, Chạy chương trình với bộ dữ liệu

(1, 35000) Quan sát kết quả nhận được Hãy thử đoán lí do tại sao chương trình cho kết quả sai

1, Cú pháp khai báo biến trong Pascal:

2, Cú pháp lệnh gán trong Pascal:

Biến := Biểu thức ;

dùng để nhập dữ liệu từ bàn phím

và *) :

- Bị bỏ qua khi dịch chương trình.

Tổng kết

5, Lệnh read(danh sách biến) hoặc readln(danh sách biến) được dùng để nhập dữ liệu từ bàn phím Sau khi nhập cần nhấn phím Enter để xác nhận Nếu giá trị nhập vào vượt quá phạm vi của biến, nói chung kết quả tính toán

sẽ sai.

Tổng kết