NV

Viết chương trình in ra các số tự nhiên lẻ trong phạm vi n, với n nhập từ bàn phím. Vd: nhập n =8 In ra 1 3 5 7. Giúp mình vs ạ

H9
22 tháng 2 2023 lúc 15:11

Uses crt;

var n,i: integer;

begin clrscr;

readln(n);

for i:=1 to n do if (n mod 2<>0) then 

write(i:2);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
PT
Xem chi tiết
NT
Xem chi tiết
HN
Xem chi tiết
TH
Xem chi tiết
NH
Xem chi tiết
BB
Xem chi tiết
Xem chi tiết
LL
Xem chi tiết
NH
Xem chi tiết