1. Напишите программу на языке Кумир для рисования слова банан , используя алгоритмы для изображения букв

1. Вот программа на языке Кумир для рисования слова "банан" с использованием алгоритмов для изображения букв:

\[
\begin{{array}}{{ll}}
\text{{алгоритм рисования буквы "б"}} & \text{{алгоритм рисования буквы "а"}} \\
\text{{начать}} & \text{{начать}} \\
\text{{вниз на 100}} & \text{{вниз на 100}} \\
\text{{налево на 50}} & \text{{налево на 50}} \\
\text{{вверх на 100}} & \text{{вверх на 100}} \\
\text{{направо на 50}} & \text{{направо на 50}} \\
\text{{вниз на 50}} & \text{{вниз на 50}} \\
\text{{вправо на 50}} & \text{{налево на 50}} \\
\text{{вниз на 50}} & \text{{вниз на 50}} \\
\text{{влево на 50}} & \text{{направо на 50}} \\
\text{{вниз на 50}} & \text{{вверх на 50}} \\
\text{{вниз на 50}} & \text{{вниз на 50}} \\
\text{{влево на 50}} & \text{{налево на 50}} \\
\text{{вниз на 50}} & \text{{вниз на 50}} \\
\text{{вниз на 100}} & \text{{вниз на 100}} \\
\end{{array}}
\]

2. Максимальное количество областей, на которые плоскость делится прямыми, вычисляется по формуле:
\[
l(n) = l(n - 1) + n
\]
где \( n \) - количество прямых.

Для заданного случая с 9 прямыми, мы можем вычислить \( l(9) \):
\[
l(9) = l(8) + 9 = l(7) + 8 + 9 = \ldots = l(0) + 1 + 2 + \ldots + 8 + 9
\]
Таким образом, \( l(9) \) равно сумме всех чисел от 1 до 9:
\[
l(9) = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 = 45
\]
Таким образом, количество областей, на которые плоскость делится девятью прямыми, равно 45.

3. Вот программа на языке Pascal для поиска максимального из четырех чисел, используя функцию для нахождения максимального из двух чисел:

pascal

program MaxNumber;

 

function Max(a, b: integer): integer;

begin

  if a > b then

    Max := a

  else

    Max := b;

end;

 

var

  a, b, c, d, maxNumber: integer;

 

begin

  writeln("Введите четыре числа:");

  readln(a, b, c, d);

 

  maxNumber := Max(a, b);

  maxNumber := Max(maxNumber, c);

  maxNumber := Max(maxNumber, d);

 

  writeln("Максимальное число:", maxNumber);

end.

Вы можете запустить эту программу в среде программирования Pascal, ввести четыре числа и получить максимальное из них.