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

Программа напечатает 35 строк.

Давайте разберемся, как это работает.

1. Внешний цикл FOR k := 8 DOWNTO 1 DO означает, что переменная k будет принимать значения от 8 до 1, уменьшаясь на 1 с каждой итерацией. Таким образом, цикл будет выполняться 8 раз, так как 8, 7, 6, 5, 4, 3, 2, 1 — это 8 значений для k.

2. Внутренний цикл FOR l := 10 TO 14 DO означает, что переменная l будет принимать значения от 10 до 14, увеличиваясь на 1 с каждой итерацией. Таким образом, цикл будет выполняться 5 раз, так как 10, 11, 12, 13, 14 — это 5 значений для l.

3. Внутри обоих циклов программа выполняет команду writeln('Мне нравится Паскаль.');, которая выводит строку на экран.

Теперь посчитаем общее количество строк:

• Внешний цикл выполняется 8 раз.
• Для каждого значения k внутренний цикл выполняется 5 раз.
• Итого, на каждом шаге внешнего цикла будет выполнено 5 команд writeln.
• Общее количество строк, которые будут выведены на экран, равно 8 (количество шагов внешнего цикла) × 5 (количество шагов внутреннего цикла) = 40 строк.

Таким образом, программа напечатает 40 строк.