Từ bài 1 của bài TH3. Viết chương trình Pascal để tính tiền thanh toán trong trường hợp khách hàng mua 2 mặt hàng
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
{ đơn giá: a, số lượng: b}
uses crt;
var a,b,s,thanhtoan:integer;
begin
write('nhap gia don hang:');
read(a);
write('nhap so luong hang:');
s:=0;
thanhtoan:=0;
s:=a*b;
if s>100 then thanhtoan:= s*(30/100)
else thanhtoan:= s* (10/100);
write(' so tien can thanh toan la:',' ',thanhtoan);
readln;
end.
program CT_dautien;
uses crt;
var a:integer;
begin
clrscr;
writeln('moi nhap so a');readln(a);
if a mod 2 = 0 then write(a, 'la so chan') else write(a, 'la so le');
readln
end.
Khi mua chiếc tủ lạnh thì khách hàng cần số tiền là:
18000000x15:100=2700000(đồng)
đáp số: 2700000 đồng
TL
Giảm 15% => Phải trả 85% số tiền
18 000 000 x 85% = 15 300 000 (đồng)
Khi nào rảnh vào kênh H-EDITOR xem vid nha!!! Thanks!