viết ctr tính số tiền nua sách cho khách, nếu tổng số tiền của khách mua sách lớn hơn hoặc bằng 500.000d thì giảm 30% số tiền phải trả ngược lại giảm 20% số tiền trả. In kết quả ra màn hình
viết ctr tính số tiền nua sách cho khách, nếu tổng số tiền của khách mua sách lớn hơn hoặc bằng 500.000d thì giảm 30% số tiền phải trả ngược lại giảm 20% số tiền trả. In kết quả ra màn hình
program Min;
uses crt;
var tien:longint;
begin
clrscr;
writeln(‘Tong so tien da mua sach la: ‘); readln(tien);
if tien>500000 then writeln(‘Ban duoc giam 30% tien phai tra.’)
else writeln(‘Ban duoc giam 20% tien phai tra.’);
readln
end.
Bạn xem lại chương trình nha 😀