dùng câu lênh for…do viết chương trình vẽ liên tiếp 3 tam giác đều. MỌI NGƯỜI GIÚP EM VỚI Ạ!

0 bình luận về “dùng câu lênh for…do viết chương trình vẽ liên tiếp 3 tam giác đều. MỌI NGƯỜI GIÚP EM VỚI Ạ!”

1. uses crt;

   var i:byte;

   begin

   clrscr;

   for i:=1 to 3 do

   begin

   writeln(‘        *   ‘);

   writeln(‘     * * *  ‘);

   writeln(‘  * * * * * ‘);

   writeln(‘* * * * * * *’);

   end;

   readln

   end.

   Bình luận

2. Program Hotboy ;

   Uses crt;

   Var i:byte;

   Begin

   Clrscr;

   For i:=1 to 3 do

   Begin

   Writeln(‘ * ‘);

   Writeln(‘ * *  ‘);

   Writeln(‘ * * *  ‘);

   End;

   Readln

   End.

   Bình luận