nhập vào một số bất kỳ kiểm tra xem số đó có nằm trong khoảng 10 tới 100 và là số lẻ hay không .Nếu có in số đó ra màn hình là số thoả mãn điều kiện,con không thì nhập lại số đó
nhập vào một số bất kỳ kiểm tra xem số đó có nằm trong khoảng 10 tới 100 và là số lẻ hay không .Nếu có in số đó ra màn hình là số thoả mãn điều kiện,con không thì nhập lại số đó
Program helolo;
uses crt;
var n:integer;
begin
if n>=10 and n<=100 and n%2==1: writeln(n);
else writeln(‘Hay nhap lai);
end.
var n,i:longint;
begin
repeat
writeln(‘nhap vao n’);readln(n);
for i:=10 to 100 do
if n=i then writeln(n,’trong khoang 1..100′);
until n=i;
if n mod 2=0 then writeln(‘la so chan’) else writeln(‘la so le’);
readln
end.