Viết chương trình Pascal vẽ 1 tam giác cân bằng dấu. In ra màn hình tam giác đó

0 bình luận về “Viết chương trình Pascal vẽ 1 tam giác cân bằng dấu. In ra màn hình tam giác đó”

1. Bài là

   Program Tam_giac_can;

   Uses crt;

   Begin Clrscr;

   Writeln(‘     .     ‘);

   Writeln(‘    . .    ‘);

   Writeln(‘   . . .   ‘);

   Writeln(‘  . . . .  ‘);

   Writeln(‘ . . . . . ‘);

   Readln;

   End.

   P/S: Chạy thử xem có được không nha ^^

   Bình luận

2. program phuongt;
   uses crt;
   begin
             clrscr;
             writeln(‘Tam giac can: ‘);
             writeln(‘        .        ‘);
             writeln(‘      .   .      ‘);
             writeln(‘     .     .     ‘);
             writeln(‘    .       .    ‘);
             writeln(‘   .         .   ‘);
             writeln(‘  .           .  ‘);
             writeln(‘ .             . ‘);
             writeln(‘……………..’);
             readln
   end.

   Bình luận