22. Цикл із передумовою while мови Pascal

Цикл з передумовою — цикл, що виконується доки істинна деяка умова, вказана перед його початком. Ця умова перевіряється до початку виконання тіла циклу, тому тіло може бути не виконане жодного разу (якщо умова з початку хибна). У більшості процедурних мов програмування здійснюється за допомогою інструкції while, звідси його друга назва — while-цикл. На мові Паскаль цикл з передумовою має наступний вигляд:

while <умова> do

begin

<тіло циклу>

end;

23. Процедура виведення даних мови Pascal

Виведення, або запис (від англ. write - писати), значення виразу на дисплей здійснюється за допомогою процедури writeln або write за таким синтаксисом:

writeln(<список виведення>); write(<список виведення>);

Тут <список виведення> — це список записаних через кому виразів.

Процедури writeln і write виводять дані на екран у символьному вигляді. Виведення здійснюється зліва направо та згори донизу. Якщо рядок символів, що виводиться, має довжину, яка перевищує ширину вікна програми, то символи переносяться на новий рядок. Якщо виведення здійснюється в останньому рядку вікна програми, то вже відображені рядки символів зсуваються догори, у результаті чого верхній рядок зникає, а знизу додається порожній рядок. Такий спосіб відображення даних називається прокруткою.

Параметрами процедур writeln і write можуть бути рядкові константи, що записуються в одинарних лапках. За допомогою рядкових констант можна виводити повідомлення:

writeln('Demonstration constant expression:');

Для виведення значень іменованих числових констант використовують їх ідентифікатори. Значення констант перетворюються у набір символів, які виводяться на екран або інший пристрій:

const   digit = 1000;              {іменова цілочислова константа} begin   writeln(5);                {цілочислове значення}   writeln('digit=',digit);   {значення іменованої константи} end.

Параметри процедур writeln і write можуть бути булевими константами. Лапки в такому разі не потрібні:

writeln(true);

У процедурах виведення як параметри можна використовувати константні вирази, наприклад:

const   BitwiseExpression = 5 and 3; begin   writeln(BitwiseExpression); end.

Найчастіше процедури виведення застосовують для відображення значень змінних на екрані дисплея. Як параметри процедур використовуються ідентифікатори змінних і вирази:

var    i:integer;   a:real; begin   writeln(a,i,a+i);   {вивести значення змінних і виразу}   writeln(a>i);       {вивести значення виразу відношення} end.

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

writeln(digit:10);   {вивести ціле число в поле завширшки 10 символів} write(a:8:3);        {дійсне число вивести в поле завширшки 8 символів, кількість символів у дробовій частині числа дорівнює трьом}

Процедура writeln, на відміну від процедури write, після виведення значень згідно зі списком виведення переведе курсор до нового рядка. Виклик процедури виведення після попереднього виклику writeln відобразить дані в новому рядку, в той час як виведення після попереднього виклику write здійснюватиметься в тому самому рядку, з поточної позиції курсору.

Процедуру writeln можна викликати без параметрів, що спричинить переведення курсору на новий рядок без виведення даних.