Как узнать сколько строк напечатает программа:var k,l:integer;begin FOR k:=8 DOWNTO 1 DOFOR l:=10 TO 14 DOwriteln('Мне нравится Паскаль.');end.

40 строк

Объяснение:

var

 k, l: integer;  // Целочисленные переменные k и l

begin  // Начало программы

 for k := 8 DOWNTO 1 DO  // Идём с 8 до 1 (8 итераций)

   for l := 10 TO 14 DO  // Идём с 10 до 14 (5 итераций)

5 × 8 = 40

     writeln('Мне нравится Паскаль.');  // Выводим сообщение с новой строки

end. // Конец программы