Mọi người ơi giúp em với ạ
Viết chương trình nhập vào đơn giá một mặt hàng và số lượng bán của mặt hang
tính tiền khách phải trả,với thông tin như sau:
- Thành tiền: đơn giá* số lượng
- Giảm giá: nếu thành tiền > 100, thì giảm 3 % thành tiền, ngược lại không giảm
- Tổng tiền phải trả : thành tiền - giảm...
Đọc tiếp
Mọi người ơi giúp em với ạ
Viết chương trình nhập vào đơn giá một mặt hàng và số lượng bán của mặt hang
tính tiền khách phải trả,với thông tin như sau:
- Thành tiền: đơn giá* số lượng
- Giảm giá: nếu thành tiền > 100, thì giảm 3 % thành tiền, ngược lại không giảm
- Tổng tiền phải trả : thành tiền - giảm giá
uses crt;
var mh,sl,tt:longint;
begin
clrscr;
write('Nhap don gia cua mat hang:'); readln(mh);
write('Nhap so luong cua mat hang ',mh,':'); readln(sl);
tt:=sl*mh;
if tt>100 then writeln('So tien phai tra la: ',tt*97/100:4:2)
else writeln('So tien phai tra la: ',tt);
readln;
end.