viết chương trình nhập từ bàn phím số nguyên dương x.bạn hãy kiểm xem x có nằmvtrong đoạn [20,100] không nếu có thì hiển thị ra màn hình :” x is in the range [20,100],ngược lại hiển thị” x is not in the range [20,100]” hộ mik vs
viết chương trình nhập từ bàn phím số nguyên dương x.bạn hãy kiểm xem x có nằmvtrong đoạn [20,100] không nếu có thì hiển thị ra màn hình :” x is in the range [20,100],ngược lại hiển thị” x is not in the range [20,100]” hộ mik vs
program phamvi;
uses crt;
var x:integer;
begin
clrscr;
write(‘Nhap x: ‘);
readln(x);
if (x>=20) and (x<=100) then write(‘x is in the range [20,100]’)
else write(‘x is not in range [20,100]’);
readln
end.
program phamvi
uses crt;
var x:integer;
begin
clrscr;
write(‘Nhap x’); readln(x);
if x in[20..100] then write(‘x is in the range [20,100]’)
else write(‘x is not in the range [20,100]’);
readln;
end.