Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có nằm trong khoảng từ 1 đến 100 hay ko , thông báo kết quả ra màn hình

1 câu trả lời

program bai_giai;

uses crt;

var a:longint;

begin

clrscr;

write('nhap a:');readln(a);

if(a>=0)and(a<=100)then write('n nam trong khoang tu 1 den 100')

else write('n khong nam trong khoang tu 1 den 100');

readln;

end.