Презентація на тему «Підпрограми-функції»

Гресько Л.І.
Підпрограми-функції(опис та виклик)

Гресько Л.І.
Опис функції
Function Proba (список форм. параметрів) : тип результату ;
Var локальні змінні ;
Текст функції …
Proba : = результат ;
End ; виклик функції
Головна програма
Var глобальні змінні ; або x:= Proba(…);
Begin writeln (x) ;
Текст програми ...
Writeln( Proba(список фактичних параметрів)) ;
Еnd.

Гресько Л.І.
Приклад
Знайти середні арифметичні значення двох пар чисел a, b та c, d.

Гресько Л.І.
Function Proba (x, y : real) : real ;
Proba : = ( x+y) / 2 ;
End ;
Головна програма
Var a,b,c,d : real ;
Begin
Readln(a,b,c,d) ;
Writeln( Proba(a, b), Proba(c, d)) ;
Еnd.
Виклик функції

Гресько Л.І.
Інший варіант програми

Гресько Л.І.
Опис функції
Function Proba (x, y : real) : real ;
Proba : = ( x+y) / 2 ;
End ;
Головна програма
Var a, b, c, d, x, y : real;
Begin
Readln(a,b,c,d) ;
X:= Proba(a, b);
Y:= Proba(c, d) ;
Writeln ( X:8:2,Y:8:2)
end.
Виклик функції
початок