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

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