Помогите 13б срочнооо
Сколько строк напечатает программа:
var k,l:integer;

begin

k:=8;

while k>0 do

begin

l:=10;

while l<15 do

begin

writeln('Мне нравится Паскаль.');

l:=l+1;

end;

k:=k-1;

end;

end.