LN

 Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n ( HD: cho biến i chạy từ 1 đến n. Nếu i chẵn ( i chia 2 dư 0) thì in ra số n.) giúp e vs ạ

NT
4 tháng 8 2023 lúc 20:20

uses crt;

var i,n:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

if i mod 2=1 then write(i:4);

readln;

end.

Bình luận (1)

Các câu hỏi tương tự
GN
Xem chi tiết
MP
Xem chi tiết
LK
Xem chi tiết
ND
Xem chi tiết
ND
Xem chi tiết
DT
Xem chi tiết
VC
Xem chi tiết
HB
Xem chi tiết
HL
Xem chi tiết