Практична робота | Умовний оператор. | Оператор вибору. | Практична робота | Циклом з умовою поста. | Факторіал негативного числа не існує. | Практична робота | Одномірні і двовимірні масиви | одномірні масиви | літерні величини |

загрузка...
загрузка...
На головну

Підпрограми-функції.

Опис підпрограми-функції повинно знаходитися в розділі описів програми.

Стандартний вид опису функції:

function ідентифікатор (список параметрів): тип;

Begin

тіло функції;

End;

Тут зарезервоване слово function показує, що далі йде опис функції. ідентифікатор здійснює іменування функції. список параметрів - Це список змінних, використовуваних для передачі даних в підпрограму-функцію. Тип - Це тип значення, носієм якого є ідентифікатор функції. Це значення, яке буде повертати функція.

Внутрішня структура функції аналогічна структурі програми, тобто спочатку йде розділ описів (uses, type, const, var), А потім тіло функції (begin ... end).

У тілі функції повинен обов'язково бути присутнім оператор присвоювання в лівій частині якого знаходиться ім'я функції, а в правій вираз. Цей оператор здійснює повернення з функції в основну програму. Всі оператори, які розташовуються після цього оператора присвоювання не виконуються!

Слід звернути увагу, що функція повертає єдине значення, носієм якого є ім'я функції!

Звернення до підпрограми-функції проводиться просто шляхом вказівки імені функції в складі якого-небудь вираження (наприклад: оператора присвоювання або логічного умови).

Розглянемо приклад:

скласти програму для обчислення виразу: z = axn+ bxa+ cym, Де a, x, n, b, c, y, m - цілі числа. Обчислення ступеня оформити у вигляді функції.

Uses Crt;

Functionstep (k, s:Word): Word;

Vari, f:word;

Begin

f: = 1;

fori: = 1 tos do

f: = f * k;

step: = f;

end;

Varz, a, b, c, n, m, y, x:Word;

Begin

Write( 'Введіть числа a, b, c, n, m, y, x:');

Readln(A, b, c, n, m, y, x);

z: = a * step (x, n) + b * step (x, a) + c * step (y, m);

Writeln( 'Z =', z);

End.

результат виконання програми:

Введіть числа a, b, c, n, m, y, x: 2 1 1 2 3 2 2

z = 20

 



Практична робота | Підпрограми-процедури.
загрузка...
© um.co.ua - учбові матеріали та реферати