Question

Viết chương trình nhập một số tự nhiên n (n>100) từ bàn phím? In ra màn hình các số tự nhiên lẽ trong phạm vi từ 50 đến ng (Lưu ý: Các giá trị in ra phải nằm trên cùng một hàng)

Answer 1

Program HOC24;

var i,n: integer;

begin

write('Nhap N: '); readln(n);

for i:=50 to n do if i mod 2=1 then write(i,' ');

readln

end.