Bài 6. Câu lệnh điều kiện

Nguyễn Thị Quỳnh Trang

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

Đỗ Quốc An
4 tháng 12 2016 lúc 15:30

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.

Bình luận (0)
Nguyễn Thị Quỳnh Trang
26 tháng 11 2016 lúc 19:59

sử dụng cấu trúc IF <điều kiện> THEN <câu lệnh>

 

Bình luận (0)

Các câu hỏi tương tự
nguyen thi be
Xem chi tiết
Ngô Thanh Tùng
Xem chi tiết
Sang Nghiem
Xem chi tiết
Xem chi tiết
LongNguyen
Xem chi tiết
Nguyễn Phạm Như Trang
Xem chi tiết
Kiwi
Xem chi tiết
nguyễn ngọc thúy vi
Xem chi tiết
LongNguyen
Xem chi tiết