Составить таблицу умножения на 7. p.s. написать программу в паскале через while

// Pascal ABC.NET
var
    i : integer;

begin
    while i <> 11 do begin
        writeln(7*i);
        inc(i);
    end;
end.