In số chẵn ra màn hình Viết chương trình vào 1 số N nguyên dương và in ra màn hình các số chẵn từ 0 đến N, sao cho mỗi số chiếm 4 vị trí và 1 dòng có

0 bình luận về “In số chẵn ra màn hình Viết chương trình vào 1 số N nguyên dương và in ra màn hình các số chẵn từ 0 đến N, sao cho mỗi số chiếm 4 vị trí và 1 dòng có”

1. program sochan;

   uses crt;

   var n,i,d:integer;

   begin

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

   d:=0;

   for i:=0 to n do

    begin

     if i mod 2=0 then

      begin

       write(i:4);

       inc(d);

      end;

     if d mod 15=0 then writeln;

    end;

   readln

   end.

   Bình luận

2. Program_BT;

   Uses Crt;

   Var n,i,d:longint;

   Begin

   For i:=0 to n do

   Begin

   Write(i:4);

   Inc(d);

   If d:=15 then begin d:=0; writeln; end;

   End;

   Readln

   End.

   #HOCTOTNHE!

   Bình luận