Функция, возвращающая среднее арифметическое двух аргументов
Задача
Написать функцию, которая возвращает среднее арифметическое двух переданных ей аргументов (параметров).
Похожие задачи
Решение
var a, b: real; function average(c,d: real): real; begin average := (c + d) / 2; end; begin readln(a,b); writeln(average(a,b):5:2); end.
Пример выполнения кода:
1.25 2.03 1.64
В программе создается функция average()
, имеющая два вещественных параметра (c
и d
) и возвращающая также вещественное число. В теле функции вычисляется среднее арифметическое аргументов, оно присваивается имени (идентификатору) функции. В языке программирования Pascal это означает, что присвоенное имени функции значение будет передано в основную ветку программы.
В основной ветке переменным a
и b
присваиваются значения, введенные пользователем. Далее вызывается функция average()
, которой в качестве аргументов передаются значения этих переменных. В данном случае вызов функции не присваивается никакой переменной, так как возвращенное значение сразу будет выведено на экран.