viết chương trình in ra bảng chia 5 giúp mình với!!

0 bình luận về “viết chương trình in ra bảng chia 5 giúp mình với!!”

1. program bangchia5;

   uses crt;

   var i:byte;

   begin

        clrscr;

        textcolor(red);   {tô chữ màu đỏ, không cần cũng được}

        writeln(‘BANG CHIA 5’);

        textcolor(yellow);   {tô chữ màu vàng, không cần cũng được}

        for i:=1 to 10 do

             writeln(5*i,’ : 5= ‘,i);

        readln;

   end.

   Bình luận

2. uses crt;

   var i: byte;

   Begin

            writeln(‘BANG CHiA 5’);

            for i:=1 to 10 do

            writeln(5*i,’ / 5 = ‘,i);

            readln

   End.

   Bình luận