Описать процедуру RectDiag(a, b, d), вычисляющую диагональ прямоугольника со сторонами a, b . - Pascal ABC
Формулировка задачи:
помогите пожалуйста, паскаль Описать процедуру RectDiag(a, b, d), вычисляющую диагональ прямоугольника со сторонами a, b (a, b — входные, d — выходной параметр вещественного типа).
Решение задачи: «Описать процедуру RectDiag(a, b, d), вычисляющую диагональ прямоугольника со сторонами a, b .»
textual
Листинг программы
procedure RectDiag(a, b:real;var d:real); begin d:=sqrt(a*a+b*b); end;
Объяснение кода листинга программы
- В начале кода объявляется процедура с именем RectDiag.
- В скобках после имени процедуры указываются параметры a и b, а также переменная d с типом real.
- Переменная d инициализируется значением sqrt(aa+bb).
- Код заканчивается и ничего больше не происходит.