Bài thực hành 3. Khai báo và sử dụng biến

KIỂM TRA BÀI CŨ
Nêu cú pháp khai báo biến.
Nêu cú pháp khai báo hằng.
Nêu cú pháp câu lệnh gán giá trị cho biến
Câu lệnh nhập giá trị cho biến?
d
a
b
c
Câu 1:
Câu 2: Hãy cho biết kiểu dữ liệu của các biến cần khai báo dùng để viết các chương trình để giải các bài toán dưới đây:
a)
b) Cho 2 số nguyên a, b. Tính:
Tính diện tích S của hình tam giác với độ dài cạnh a và chiều cao tương ứng h (a và h là những số tự nhiên được nhập vào từ bàn phím.
c:=a mob b;
d:= a div b;
m:= a/b;
s:= a*a*3.14;
Var a, h: integer; s: real; (s:=a*h/2;)
Var a, b, c, d: integer; m, s: real;
Các kiểu dữ liệu trong Pacal
Integer
Số nguyên 
Kiểu Byte  các số nguyên từ 0 đến 255.
( từ -32768 đến 32757)
Số thực 
Real
Kiểu kí tự 
Char
Kiểu xâu 
String
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ẽ giao hàng và thanh toán tận nhà. Ngoài giá trị hàng hoá còn phải trả thêm phí dịch vụ. Viết chương trình Pascal để 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.
real 
 integer
 real
Thanhtien
Var sl: integer;
gia, tt: real;
Dongia
Khai báo
Soluong
Khai báo
Khai báo
Soluong
Khai báo
Thanhtien
Dongia
Thanhtien
Dongia
Thanhtien
Dongia
Thân chương trình
Nhập giá trị cho biến
Write(‘So luong= ‘);
Readln(sl);
Write(‘Don gia= ‘);
Readln(gia);
Var sl: integer;
gia, tt: real;
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ẽ giao hàng và thanh toán tận nhà. Ngoài giá trị hàng hoá còn phải trả thêm phí dịch vụ. Viết chương trình Pascal để 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.
Var sl: integer;
gia, tt:real;
Write(‘So luong= ‘);
Readln(sl);
Write(‘Don gia= ‘);
Readln(gia);

tt:=sl*gia +phi;
Writeln(‘So tien phai thanh toan la’, tt:10:2);
1
2
3
4
Tính tiền:
tt := sl*gia+phi;
 Thông báo kết quả
Chỉ một biến cho mỗi kiểu dữ liệu.
10 biến
Chỉ hạn chế bởi dung lương bộ nhớ.
Không giới hạn.
d
a
b
c
Câu 1: Số biến có thể khai báo tối đa trong một chương trình là bao nhiêu?
2. Tìm chỗ sai trong các lệnh khai báo sau và sửa lại cho đúng:
Var chieu cao: real;
Const x:=3.14;
Var diemtrungbinh: integer;
Var a1, a2: integer, b1, b2: real;

Var chieucao: real;
Const x=3.14;
Var diemtrungbinh: real;
Var a1, a2: integer;
b1, b2: real;

Thank You!