viết chương trình in ra bảng cửu chương từ 1 đến 10. nhanh giúp mik vs ạ

0 bình luận về “viết chương trình in ra bảng cửu chương từ 1 đến 10. nhanh giúp mik vs ạ”

1. Program BTT;
   Uses crt;
   Var i,j: longint;

   Begin
           Clrscr;
           For i:=1 to 10 do
           Begin
                   For j:=1 to 10 do
                           Writeln(i,’ x ‘,j,’ = ‘,i*j);
                   Writeln;
           End;

           Readln
   End.

   Bình luận

2. uses crt;
   var x,y,i,j:longint;
   begin
   clrscr;

   for i:=1 to 10 do
   for j:=2 to 10 do
   begin
   write (‘ ‘,j,’x’,i,’=’,i*j,’ ‘);
   if j=10 then writeln;
   end;

   readln;
   end.

   Bình luận