Пример 14.5 (Продолжение)

Какая задача решается с помо-щью данной программы? Запишите соответствующее математическое выражение.

Что делает и как описывается процедура?

Как в программе вызывается

процедура?

Запишите формальные и фак-тические параметры процеду-ры.

Объяснить работу програм- мы.

Провести вычисления по про-грамме для следующих пара-метров:

a=3, b=8, c=3;

a=4, b=27, c=3.

Как задать параметр d?

В чем схожесть и отличие программ в примерах 14.4 и 14.5?

Лабораторная работа № 15

Работа в среде Турбо Паскаль.

Составление программ с использованием функций.

Функции

Структура программы

Program <имя программы>;

Label <метки>;

Const < константы>;

Type < типы данных>;

Var <переменные>;

<процедуры и функции>;

Begin

<тело программы>;

End.

Структура функции

Function <имя функции> (<фор-мальные параметры>): тип ре-зультата;

{описательная часть функции}

Begin

<тело процедуры>;

<имя функции>:=результат;

End;

Пример 15.1 Вычислить

Program PR_15_1;

const a=3;

var b,P:real;

function n_stepen_x (x, n: real): real;

Begin

n_stepen_x:=exp(n*ln(x));

end;

begin

b:=n_stepen_x(2,3);

P:=a*b;

writeln('P=',P:5:2);

writeln('x v n-oj stepeni=',b:5:2)

end.