Kiểm tra cũ 1, Viết cú pháp cách khai báo biến? Cho VD Var tên biến : kiểu liệu; 2, Viết cú pháp cách khai báo hằng? Cho VD Const tên = giá trị hằng; Tìm chỗ sai lệnh khai báo sau sửa lại cho đúng? a) Var start, begin: real; b) const x:=3; y:=1000; Const a=5; c) Var a:=5; d) Const ten lop = ‘8A 2’; Tên biến chứa dấu cách e) Var xep_loai, diem : integer, real; Phải khai báo riêng kiểu liệu Chữa tập (SGK-T33) Hãy liệt kê lỗi có chương trình 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 liệu biến b chưa Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN Các kiểu liệu Pascal Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN Cách khai báo biến với kiểu liệu a)- Khai báo biến Var : ; Trong đó: + Danh sách biến nhiều biến có kiểu liệu, phân cách dấu phẩy (,) + Kiểu liệu kiểu liệu Pascal 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 Viết chương trình Pascal có khai báo 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 toán nhà Khách hàng cần đăng kí số lượng mặt hàng cần mua, nhân viên cửa hàng trả hàng nhận tiền toán nhà khách hàng Ngoài trị giá hàng hóa, khách hàng phải trả thêm phí dịch vụ Hãy viết chương trình Pascal để tính tiền toán trường hợp khách hàng mua mặt hàng Ví dụ Hãy tính tiền mua SGK Tin học 3, biết: - Số lượng: 100 - Đơn giá: 18.300/quyển - Phí dịch vụ: 5000 => Tiền toán = 100 x 18.300 + 5000 = 1.835.000 => Công thức cần tính cho toán: => Tiền toán = Đơn giá x Số lượng + Phí dịch vụ a, Khởi động Pascal Gõ chương trình SGK/35 tìm hiểu ý nghĩa câu lệnh chương trình: b, Lưu chương trình với tên BaiTH3_8A Dịch chỉnh sửa lỗi gõ, có { Cach viet chuong trinh SGK} Program Tinh_tien; Uses crt; Var soluong : integer ; dongia, thanhtien : real ; thongbao : string ; Const phi = 10000 ; Begin Clrscr ; Thongbao := ‘Tong so tien phai toan la: ’ ; { Nhap don gia va so luong hang } Writeln(‘Don gia = ’) ; readln(dongia) ; Writeln(‘So luong = ’) ; readln(soluong) ; Thanhtien := soluong * dongia + phi ; (* In so tien phai tra *) Writeln(thongbao, thanhtien :10:2) ; readln Program Tinh_tien; Uses crt; Var soluong : Integer ; dongia, thanhtien : real ; Const phi = 10000 ; Begin Clrscr ; { Nhap don gia va so luong hang } Writeln(‘Don gia = ’) ; readln(dongia) ; Writeln(‘So luong = ’) ; readln(soluong) ; Thanhtien := soluong * dongia + phi ; (* In so tien phai tra *) Writeln(‘Tong so tien phai toan la: ‘, ); thanhtien :10:2 Readln End Bài c, Chạy chương trình với liệu (đơn giá số lượng) sau (1000, 20), (3500, 200), (18500, 123) Kiểm tra tính kết in d, Chạy chương trình với liệu (1, 35000) Quan sát kết nhận Hãy thử đoán lí chương trình cho kết sai Tổng kết 1, Cú pháp khai báo biến Pascal: Var Danh sách tên biến : Kiểu liệu ; 2, Cú pháp khai báo Pascal: Const tên : giá trị ; 2, Cú pháp lệnh gán Pascal: Biến := Biểu thức ; 3, Lệnh read(danh sách biến) readln(danh sách biến) dùng để nhập liệu từ bàn phím 4, Nội dung thích nằm cặp dấu { } cặp dấu (* *) : - Bị bỏ qua dịch chương trình - Làm cho chương trình dễ đọc, dễ hiểu Tổng kết 5, Lệnh read(danh sách biến) readln(danh sách biến) dùng để nhập liệu từ bàn phím Sau nhập cần nhấn phím Enter để xác nhận Nếu giá trị nhập vào vượt phạm vi biến, nói chung kết tính toán sai [...]... 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 Tổng kết 1, Cú pháp khai báo biến trong Pascal: Var Danh sách tên biến : Kiểu dữ liệu ; 2, Cú pháp khai báo hằng trong Pascal: Const tên... hằng ; 2, Cú pháp lệnh gán trong Pascal: Biến := Biểu thức ; 3, 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 4, Nội dung chú thích nằm trong cặp dấu { và } hoặc cặp các dấu (* và *) : - Bị bỏ qua khi dịch chương trình - Làm cho chương trình dễ đọc, dễ hiểu 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... trình dễ đọc, dễ hiểu 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 ... 200; ⇒ Khai báo kiểu liệu biến b chưa Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN Các kiểu liệu Pascal Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN Cách khai báo biến với kiểu liệu a)- Khai báo biến. .. pháp khai báo biến Pascal: Var Danh sách tên biến : Kiểu liệu ; 2, Cú pháp khai báo Pascal: Const tên : giá trị ; 2, Cú pháp lệnh gán Pascal: Biến := Biểu thức ; 3, Lệnh read(danh sách biến) ... can_nang, diem_TBm : real; Var Ho_va_Ten, noi_sinh, : string; Bài Viết chương trình Pascal có khai báo 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 toán nhà Khách hàng cần đăng kí số