Viết chương trình in ra màn hình a, ****************************** * họ và tên * * lớp * * trường * ****************************** b, bảng cửu chương 7 c, 50 chữ '' HOC TRUC TUYEN ''

1/

     program chuong_trinh;

     used crt;

begin

     clrscr;

     writeln('******************************');

     writeln(' *     ho va ten                     *');

      writeln(' ******************************');

      readln;

end.

2/

    program bang_cuu_chuong

    used crt;

begin

     clrscr;

      writeln('7x1=7');

       writeln('7 x 2=14');

      writeln('7 x 3=21');

      writeln('7 x 4=28');

      writeln('7 x 5= 35');

       writeln('7 x 6= 42');

       writeln('7x7=49');

       writeln('7x8=56');

       writeln('7x9=63');

        writeln('7x10=70');

       readln;

end.

3/

     program bt3;

     used crt;

      var i:integer;

begin

   clrscr;

    for i:=1 to 50 do

          begin 

               writeln('HOC TRUC TUYEN');delay(1);

                end;

               readln;

end.

(tips:ở chỗ delay bạn chỉnh tốc dộ tùy ý nha)(nếu thấy có ích thì cho mình xin 5sao và cảm ơn nha)