an>
Залежно від цього розрізняються процедури по своїй конструкції і виконуваних функцій.
Процедура описана і після цього починається основна програма.
.8 Виклик процедури з програми
обов'язкове про вказується ім'я процедури. У дужках задаються фактичні значення вхідних параметрів і ті змінні, в які будуть В« запам'ятовуватися В»вихідні значення.
Розглянемо приклад, де може бути використана процедура другого типу: має вхідні параметри, але не має вихідних.
Приклад 2. Скласти програму, яка встановлює, які числа із заданого проміжку [a; b] можна представити у вигляді суми двох квадратів цілих чисел? p align="justify"> У цій програмі, нам доведеться перевіряти кожне з чисел проміжку [a; b] чи можна його представити у вигляді суми квадратів двох чисел, тому було б розумно розробити процедуру, яка б перевіряла одне число і потім звертатися до неї з основної програми для перевірки кожного числа з проміжку. Процедуру складемо по наступного способу. Нехай задано число n . Тут, в якості b взято найменше натуральне число 1. Організувавши такий цикл, і підрахувавши, скільки чисел a буде потрібно, ми дізнаємося скільки чисел треба переглядати, щоб знайти рішення рівняння. Цей цикл може бути таким:
: = 1; k: = 1;
while a * a + 1 <= n do < span align = "justify">
begin : = k + 1;
a: = a + 1
end ;
.9 Складання математичних задач
) В«Знайти максимальне з трьох введених чиселВ». Для вирішення скористаємося описом функції, приймаючої значення максимального з двох чисел, що передаються до неї у вигляді параметрів.
Program Fn ;
Var , B, C: Real;
Function Max (A, B: Real): Real;
Begin : = 16;: = 13;: = 11; A> B Then Max: = A Max: = B
End ;
Begin
Writeln ('16, 13, 11 &...
