Question

Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng số nguyên dương n ( Với n được nhập). Yêu cầu nhập lại nếu n <=0</p>

1. Hướng dẫn:

– Sử dụng kiến thức số lẻ đầu tiên bằng 1. Số lẻ sau bằng số trước cộng với 2.

–  Cho biến i có giá trị ban đầu bằng 1.

–  Dùng vòng lặp while do với điều kiện i < n và công việc bên trong là in i và tăng i lên 2.

Answer 1

Program In_So_Le;

 

uses crt;

var i,n:integer;

begin

clrscr;

Repeat

write(‘Nhap so n: ‘);readln(n);

until n>0;

i:=1;

while i<=n do</p>

begin

write(i:3,’, ‘);

i:=i+2;

end;

readln

end.