Đề Bài : Viết chương trình nhập 1 số nguyên dương n , xuất ra màn hình 1 dãy số nguyên dương từ 1 đến n là lẻ và 1 dãy số nguyên dương 1 đến n là chẵn Phạm vi từ 1 đến 10 Giup mình với nếu đúng hứa vote 5sao + cám ơn + câu trả lời hay nhất

2 câu trả lời

program ct;

uses crt;

var i,n:integer;

begin clrscr;

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

   write('Cac so nguyen duong tu 1 den ',n,' la le: ');

   for i:=1 to n do

      if i mod 2<>0 then write(i:3);

   writeln;

   write('Cac so nguyen duong tu 1 den ',n,' la chan: ');

   for i:=1 to n do

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

readln;

end.

Học tốt!

uses crt;
var i,n:longint;
begin
clrscr;
   write('n=');readln(n);
   for i:=1 to n do if i mod 2=1 then write(i,' '); writeln;
   for i:=1 to n do if i mod 2=0 then write(i,' ');
readln
end.

Câu hỏi trong lớp Xem thêm