các thao tác để làm việc với 1 ch- ơng trình có sử dụng biến.
ợ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 hoá, khách hàng còn phải trả thêm phí dịch vụ. Hãy 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.
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 : ';
{Nhap don gia va so luong hang} write('Don gia = ');readln(dongia); write('So luong =’);readln(soluong); thanhtien:= soluong*dongia+phi;
(*In ra so tien phai tra*)
writeln(thongbao,thanhtien:10:2); readln
end.
a) Lu chơng trình với tên TINHTIEN.PAS. Dịch và chỉnh sửa các lỗi gõ, nếu có. và chỉnh sửa các lỗi gõ, nếu có.
b) 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, 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. 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.
4. Củng cố - luyện tập
Nhận xét ý thức và kết quả tiết thực hành
5. Hớng dẫn về nhà.
Ngày dạy: 06/10/2011
Tiết 14
Bài thực hành 3. khai báo và sử dụng biến (Tiết 2) i. Mục tiêu :
1. Kiến thức: 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. Sử dụng đợc lệnh gán giá trị cho biến. Hiểu việc nhập dữ liệu cho biến từ bàn phím. Sử dụng đợc lệnh gán giá trị cho biến. Hiểu cách khai báo và sử dụng hằng.
2. Kỹ năng :Thực hiện đợc việc tráo đổi giá trị của hai biến.
3. Thái độ: Nghiêm túc trong học tập, ham thích lập trình trên máy tính để giải các bài tập.
ii. Chuẩn bị :
1. Giáo viên :
- SGK, SGV, tài liệu, Giáo án
- Đồ dùng dạy học nh máy tính, projector,...