BTVN: 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ụ. $\\$ Viết chương trình cho bài toán trên.

2 câu trả lời

bạn kham khảo nha

uses crt;

var a, b, t : longint;

const p = 10000;

begin

clrscr;

write('nhap so luong : ');readln(a);

write('nhap don gia : ');readln(b);

t := a * b;

if t >= 600000 then writeln('tien thanh toan : ', t)

else writeln('tien thanh toan : ', t + p);

readln

end.

Câu hỏi trong lớp Xem thêm