BÀI TẬP 1: 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à nhận tiền thanh toán tại nhà khách hàng. Ngoài giá trị hàng hóa, 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. Phí dịch vụ: 10.000, nếu khách hàng mua số tiền thanh toán >600.000₫ thì sẽ miễn phí dịch vụ. $\\$ Em hãy viết chương trình Pascal cho bài toán trên.

2 câu trả lời

Gửi bạn

program  bai_tap_1;
var sl: integer;

      dg, phi, tong: longint;
begin

writeln('moi ban nhap don gia 1 mat hang'); readln(dg);
writeln('moi ban nhap so luong mat hang'); readln(sl);
writeln('moi ban nhap phi van chuyen'); readln(phi);
tong:= dg*sl+phi;
writeln('tong tien quy khach can phai thanh toan la:',tong);

if tong > 600.000 then

writeln('Ban duoc miem phi tien dich vu');
readln

end.

CHÚC BẠN HỌC TỐT!

program bai_tap_1; var sl: integer; dg, phi, tong: longint; Benin writeln('moi ban nhap don gia 1 mat hang'); readln(dg); writeln('moi ban nhap so luong mat hang'); readln(sl); writeln('moi ban nhap phi van chuyen'); readln(phi); tong:= dg*sl+phi; writeln('tong tien quy khach can phai thanh toan la:',tong); if tong > 600.000 then writeln('Ban duoc miem phi tien dich vu'); readln end. #Hoidap247 kieuanh64
Câu hỏi trong lớp Xem thêm