Переставьте строки так, чтобы получилась программа gipotenuza, вычисляющая квадрат гипотенузы прямоугольного

Переставьте строки так, чтобы получилась программа gipotenuza, вычисляющая квадрат гипотенузы прямоугольного треугольника на основе двух введенных с клавиатуры катетов.

1. program gipotenuza;

2. var
a, b, c: integer;

3. begin

5. write("Введите длины катетов: ");

6. readln(a, b);

7. c := a * a + b * b;

8. write("Квадрат гипотенузы равен ", c);

9. end.

Разъяснение:
Мы начинаем программу с ключевого слова "program" и названия программы, которое в данном случае "gipotenuza". Затем мы определяем переменные a, b и c, которые будут использоваться для хранения значений катетов и квадрата гипотенузы соответственно. Далее идет ключевое слово "begin", означающее начало основной части программы. Мы печатаем сообщение "Введите длины катетов: " для запроса у пользователя ввода с клавиатуры. Следующая строка считывает значения a и b с помощью процедуры "readln". Затем мы вычисляем квадрат гипотенузы, используя формулу a * a + b * b, и сохраняем результат в переменную c. Наконец, мы печатаем сообщение "Квадрат гипотенузы равен " и значение переменной c. Программа завершается ключевым словом "end", обозначающим конец программы.

Пример:
Пользователь вводит значения катетов 3 и 4.
Программа вычисляет квадрат гипотенузы как 3 * 3 + 4 * 4 = 25.
Программа печатает сообщение "Квадрат гипотенузы равен 25".

Совет:
Чтобы лучше понять, как работает эта программа, вы можете вручную выполнить вычисления, чтобы увидеть, что квадрат гипотенузы действительно равен сумме квадратов катетов в прямоугольном треугольнике. Если вам необходима точность вещественных чисел, используйте тип данных "real" вместо "integer".