Em hãy viết chương trình bằng ngôn ngữ lập trình Pascal để giúp hệ thống siêu thị trên tính tiền cho khách hàng khi khách hàng nhập vào tổng số tiền mua hàng

Một hệ thống siêu thị tung ra chương trình khuyến mãi hấp dẫn nhân dịp tết sắp đến với nội dung như sau: Nếu khách hàng mua hàng với tổng số tiền không nhỏ hơn 500 ngàn đồng sẽ được giảm giá 50% và sẽ giảm giá 10% cho khách hàng nếu tổng số tiền mua hàng của khách hàng chưa đến 500 ngàn đồng. Em hãy viết chương trình bằng ngôn ngữ lập trình Pascal để giúp hệ thống siêu thị trên tính tiền cho khách hàng khi khách hàng nhập vào tổng số tiền mua hàng.