Đề bài; Viết phương trình pascal cho số tự nhiên n,xuất dãy số chẵn 2 4 6 ... 2n và dãy số lẽ 3 5 7 ... (2n+1)
Input: số tự nhiên n
Output: 2 Dãy số chẵn và lẽ (Cách nhau 1 dòng)
VD: n=3
Nên sẽ là 2 4 6 ( 6=2*3)
1 3 5 7 (7=(2*3)+1)
Cám ơn nhiều ạ
program oken; uses crt; var n,i: longint; begin clrscr; write('Nhap n: '); readln(n); write('Day so chan: '); for i:= 1 to (2*n) do if i mod 2=0 then write(i,' '); writeln; write('Day so le: '); for i:=1 to (2*n+1) do if i mod 2=1 then write(i,' '); readln; end.