Лабораторна робота № 34-35. Обробка рядків

Begin

{ Інструкції виконуваної частини функції }

Ім’яФункції:= Результат;

end;

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

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

Для допитливих!!!

Приклад.

У 1202 р. італійський математик Леонард Пізанський, відомий під ім'ям Фібоначчі, запропонував наступну задачу. Пара кроликів кожен місяць дає приплід - двох кроликів (самця і самку), від яких через два місяці уже виходить новий приплід. Скільки пар кроликів буде через рік, якщо на початку року ми мали одну пару тільки що народжених кроликів? Звертається увага на те, що числа, які відповідають кількості пар кроликів по місяцях, складають послідовність

1, 1, 2, 3, 5, 8, 13, 21.34,....

Кожний із членів цієї послідовності, починаючи з третього, дорівнює сумі двох попередніх членів. Ця послідовність називається рядом Фібоначчі, а її члени - числами Фібоначчі. Числа Фібоначчі мають багато цікавих властивостей. Ряд Фібоначчі визначають так:

F₀ = F₁ = 1; … F_n = F_n-1 + F_n-2.

Програма обчислення членів ряду Фібоначчі

function fibo(n: integer): integer;

{ функція обчислення чисел Фібоначчі }

var fn,fnl,fn2,k: integer;

begin

fnl:=1;

fn:=0;

for k:=l to n do

begin

fn2:=fnl;

fnl:=fn;

fn:= fnl+fn2;

end;

fibo:= fn; { імені функції присвоюється значення, яке повертається }

end;

{ основна програма }

var i, n: integer;

begin

write('Введіть число членів ряду Фібоначчі: '); readln(n);

for i:= 1 to n do writeln(fibo(i)); { викликв функції }

end.

Завдання 1.

Виконати завдання з використанням умови завдання 2 лабораторної роботи 28 із використанням процедури для оформлення результатів у вигляді таблички. Горизонтальні лінії якої виділити різним кольором (за допомогою звернення до процедури).

Завдання 2.

Скласти програму з використанням процедури для обчислення виразу:

1. S = 1 + 3 + 5 + 7 + … + (2n - 1);

2. S = 1 + 9 + 25 + … + (2n - 1)²;

3. S = 1 + 27 + 125 + … + (2n - 1)³;

4. S =

5. P =

1. S =

1. S =

1. S = 2 + 4 + 6 + 8 + … + 2n;

9. S = 2 + 4 + 16 + … + (2n)²;

1. S = 8 + 64 + 216 + … + (2n)³

1. S =

1. S =

Дата добавления: 2015-05-24