Viết chương trình in ra màn hình bảng nhân 7

0 bình luận về “Viết chương trình in ra màn hình bảng nhân 7”

1. uses crt;

   var i:integer;
   begin
           clrscr;     

           for i := 1 to 10 do
           begin
                   writeln(‘bang nhan 7 la: ‘,i*7,’ ‘);
           end;

   readln;
   end.

   Mình làm ngắn gọn nhưng dễ hiểu nha

   @danhle

   Bình luận

2. uses crt;

   var i,n:integer;

   begin

   write(‘nhap n=’);readln(n);

   writeln(‘7’,n);

   for i:=1 to 10 do writeln(n,’ x ‘,i:2,’ = ‘,n*i:3);

   readln

   end.
   Ko bt có đúng ko

   mk học lâu rồi

   sai thì bỏ qua nhé

   Bình luận