do для всіх
X = 1 .. 10 з кроком
1 }
begin Y: = 0.256 * Sin (X);
X : = X +1
end ; {два оператори в тілі циклу об'єднані за допомогою складеного}
Оператор циклу з постусловіем:
В
Виконання оператора полягає в наступному:
- якщо значення логічного виразу хибне, то виконується група операторів усередині циклу;
- у разі істинного значення логічного виразу здійснюється вихід з циклу.
Оскільки перевірка умови здійснюється в кінці циклу, то цикл виконується хоча б один разів.
Приклад:
X : = 1; { Y = 0.256 SinX ,
Repeat для всіх X = 1 .. 10 з кроком 1 }
Y: = 0.256 * Sin (X);
X: = X +1
until X> 10;
Оператор циклу з параметром
Оператор циклу з параметром організовує виконання одного оператора в тілі циклу заздалегідь відоме число разів. Існують два варіанти оператора. p> For I : = N to M do <оператор>;
For I: = N downto M do <оператор>;
де I - параметр циклу, що є ординальне змінної;
N - вираз, що визначає початкове значення параметра циклу;
M - вираз, що визначає кінцеве значення параметра циклу.
Виконання оператора полягає в наступному:
- поки параметр циклу не більше (у першому варіанті) або менше (у другому варіанті) кінцевого значення - виконується чергова ітерація;
- в іншому випадку здійснюється вихід з циклу.
Слід зазначити, що після виходу з циклу параметр циклу стає невизначеним, за винятком випадку, коли вихід з циклу був здійснений за допомогою оператора Goto .
Приклад:
For X: = 1 to 10 doFor X: = 10 downto 1 do
Y: = 0.256 * Sin (X); або Y: = 0.256 * Sin (X);
{При необхідності розміщення декількох операторів у тілі циклу, їх об'єднують за допомогою складеного оператора}
For X: = 1 to 10 do
begin Y: = 0.256 * Sin (X);
Writeln ( X , Y ) {висновок таблиці результатів}
end ;
В
2. Процедури і функції
2.1 Опис функції
У середовищі Turbo-Pascal маються два різновиди підпрограм - процедури та функції. Структура підпрограми аналогічна структурі програми в цілому. p> Підпрограма повинна бути описана до того, як вона буде використана в основній програмі або іншій підпрограмі. Всі параметри, які використовує підпрограма, можна розбити на дві категорії: локальні параметри, оголошені усередині підпрограми і доступні тільки їй самій, і глобальні - оголошені в основній програмі і доступні як основній програмі, так і всім її підпрограм.
2.2 Формальне опис функції
function <ім'я функції> ( <список формальних параметрів> ): <тип функції>;
<секція описів локальних змінних>;
begin <секція операторів>
де <ім'я функції> - ідентифікатор, до якого пред'являються ті ж вимоги, як до будь-якого ідентифікатором в середовищі Turbo-Pascal;
<список формальних параметрів> - всі параметри в списку зазначаються разом зі своїм типом (Одного типу через кому; різні типи через крапку з комою). Тип параметрів у списку може бути будь-який. Як окремий випадок, функція може бути без параметрів.
<тип функції> - задається звичайним способом і може бути будь-яким простим або String . .
В
2.3 Виклик функції
Виклик функції може здійснюватися з основної програми або
іншої підпрограми.
<ім'я змінної>: = <Ім'я функції> ( <список фактичних параметрів> );
або в операторі виведення
Write ( <ім'я функції> ( <список фактичних параметрів> ));
< список фактичних параметрів> - являє собою, перераховані через кому значення, які при зверненні замінюють відповідні формальні параметри в описі функції.
Слід звернути увагу на те, що кількість, тип і порядок розташування фактичних параметрів у зверненні до функції обов'язково повинен збігатися з кількістю, типом і порядком розташування формальних параметрів в описі функції.
Приклад:
В
Як раніше вказувалося, тип формальних параметрів може бути будь-яким, проте в заголовку підпрограми не можна вводити новий тип, так не можна писати:
function Max (A: array [1 .. 50] of real): real;
Правильно в основній програмі ввести новий тип, а потім використовувати його в заголовку підпрограми:
...
