Bài giảng Tin học Lớp 8 - Tiết 16, Bài thực hành 3: Sử dụng biến và hằng trong chương trình

Nội dung text: Bài giảng Tin học Lớp 8 - Tiết 16, Bài thực hành 3: Sử dụng biến và hằng trong chương trình

1. BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG CHƯƠNG TRÌNH
2. TIẾT 15 BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG CHƯƠNG TRÌNH 1. Bài 1 - Viết chương trình 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 giá trị hàng hoá, khách hàng còn phải thanh toán 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. a. Khởi động Pascal. Gõ chương trình sau và tìm hiểu ý nghĩa từng câu lệnh của chương trình.
3. TIẾT 15 BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG CHƯƠNG TRÌNH 1 Program Tinh_tien; 2 Uses CRT; 3 Var Soluong: integer; dongia, thanhtien: real; Thongbao: String; 4 Const phi=10000; 5 Begin 6 Thongbao := ‘Tong so tien phai thanh toan’; 7 Writeln(‘don gia’); Readln(dongia) ; { Nhap don gia va so luong hang } 8 Writeln(‘So luong’); Readln(soluong) ; 9 Thanhtien:= soluong*dongia + phi ; { In ra so tien phai tra } 10 Writeln(thongbao , thanhtien:10:2); 11 Readln; 12 End.
4. TIẾT 15 BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG Ý nghĩa của các câu lệnh: CHƯƠNG TRÌNH 1 - Khai báo tên chương trình 2 – khai báo thư viện 3 – khai báo biến ( số lượng-số nguyên; đơn giá, thành tiền-số thực; thông báo-kiểu chuỗi) 4 – khai báo hằng (phí – phí giao hang tận nhà là 10000) 6 – gán cho biến thông báo có nội dung là : tổng tiền phải thanh toán 7,8 – nhập giá trị cho đơn giá và số lượng 9 – tính tiền bằng biểu thức soluong*dongia + phi rồi gán cho biến thành tiền 10 – xuất giá trị của biến thông báo và biến thành tiền, có độ rông in số cho biến thành tiền là 10, có hai chữ số thập phân 11 – tạm ngưng chương trình chờ người sử dụng nhấn phím enter (lúc này dừng chương trình để xem kết quả của dòng lệnh số 10
5. TIẾT 16 BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG CHƯƠNG TRÌNH b. Chạy chương trình với các bộ dữ liệu như sau: bộ thứ nhất: 1000, 20 bộ thứ hai: 3500, 200 bộ thứ ba: 18500, 123 bộ thứ tư: 1, 35000 => Cho biết số tiền cần thanh toán ứng với mỗi bộ dữ liệu?
6. TIẾT 16 BÀI THỰC HÀNH 3: SỬ DỤNG BIẾN VÀ HẰNG TRONG CHƯƠNG TRÌNH Bài 2: Viết chương trình nhập các số nguyên x và y Program nhapgiatrichobien; Var x,y,z: Integer; Begin writeln(‘ nhap gia tri x= ’); readln(x); writeln(‘ nhap gia tri y= ’); readln(y); writeln(‘ gia tri x vua nhap= ’ , x ); writeln(‘ gia tri y vua nhap= ’ , y ); readln End.