Viết chương trình trong Tubo Pascal của các thuật toán sau
- Đọc và số nguyên a, kiểm tra xem a là số chẵn hay số lẻ
- Giảm giá 30% cho khách hàng mua với số tiền T>=100000 và cách 10% cho khách hàng mua với số tiền t<100000
- nếu x>5 thì in giá trị của X ra ngoài màn hình
- Giảm giá 30% cho khách hàng mua với số tiền T>=100000
- Nếu Delta < 0 thì in ra màn hình phương trình vô nghiệm