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

Формулировка задачи:

Даны длины двух катетов прямоугольного треугольника. Вычислить длину его гипотенузы. Входные данные: Во входном потоке заданно два вещественных числа a и b. Выходные данные: В выходной поток вывести единственное вещественное число с точностью три знака после запятой. Пример входного файла (input.txt): 3 4 Пример выходного файла (output.txt): 5.000

Решение задачи: «Даны длины двух катетов прямоугольного треугольника. Вычислить длину его гипотенузы»

Листинг программы

var a, b, c: real;
 
begin
  readln(a, b);
  c := sqrt(a * a + b * b);
  writeln(c:0:3)
end.

Объяснение кода листинга программы

В данном коде происходит следующее:

Объявляются три переменные типа real: a, b и c.
Считываются значения переменных a и b с помощью функции readln.
Вычисляется длина гипотенузы треугольника по формуле aa + bb и сохраняется в переменной c.
Выводится значение переменной c с помощью функции writeln. Таким образом, данный код позволяет вычислить длину гипотенузы прямоугольного треугольника по заданным длинам его катетов и вывести результат на экран.