Основы применения вычислительной техники и программирование. Беспалов В.В. - 29 стр.

UptoLike

Составители: 

В разделе операторов должен находиться хотя бы один оператор,
присваивающий имени функции значение. Обращение к функции осу-
ществляется по имени с указанием списка аргументов. Каждый аргу-
мент должен соответствовать формальным параметрам и иметь тот же
тип. Механизм передачи параметров будет подробнее описан ниже.
Описанную функцию можно использовать в основной части про-
граммы. Функция используется в выражениях по имени с фактическими
параметрами.
Пример 3.1. Найти значение следующего выражения:
)(
)()(
ctf
cftf
+
,
где
xxxxf ++= 32)(
2
.
Решение:
program prf;
var t,c,r:real;
function F(x:real):real;
begin
F:=sqrt(x)+2*sqr(x)+3*x;
end;
begin
Writeln(‘Введите числа’);
Write(‘t=’); Readln(t);
Write(‘c=’); Readln(c);
r:=(
F(t)–F(c))/(F(t+c));
writeln(‘результат = ’,
r:8:3);
end.
3.2. Примеры полезных функций
Часто возникает необходимость описать математическую функ-
цию, которой нет в списке стандартных функций. Например, в Паскале
нет операции возведения в произвольную степень или отсутствует
функция тангенса и факториала числа. Приведу несколько полезных
функций.
Пример 3.2.
Описание функции тангенса:
function tg(x:real):real;
begin
tg:=sin(x)/cos(x);
end;
30