Question

[Lê gia thịnh]

Cho so tu nhien n. Xuat hai day so: day so chan 2 4 6 ... 2*n và day so le 1 3 5 .. (2n+1)

Answer 1

[Nguyễn Lê Phước Thịnh]

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

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

writeln;

for i:=1 to n do 

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

readln;

end.