Оператор циклу з лічильником

Для реалізації циклічних алгоритмів, тобто алгоритмів, що містять багаторазово повторювані однакові операції, застосовуються спеціальні оператори циклу. У Паскалі є три види циклів: FOR, WHILE і REPEAT. Оператор циклу FOR записується у вигляді:

FOR змінна:=початкове значення TO кінцеве значення DO

оператор/блок

або

FOR змінна:=початкове значення DOWNTO кінцеве значення DO

оператор/блок.

Тут

змінна - будь-яка змінна порядкового типу, названа в такому контексті змінною циклу,

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

Цикл FOR виконується в такий спосіб:

змінній циклу присвоюється початкове значення, після чого виконується тіло циклу (оператор або блок, що стоїть після DO). Дві цих дії разом становлять один крок циклу. Потім змінній циклу присвоюється наступне (у циклі FOR... TO) або попереднє (у циклі FOR... DOWNTO) значення й виконується наступний крок циклу. Так відбувається доти, поки значення змінної циклу не стане більше (FOR...TO) або менше (FOR...DOWNTO) кінцевого значення.

Процедури уведення-виводу

Найпростіша процедура уведення в Паскалі - процедура READ, він записується у вигляді:

READ(ім'я, ім'я,...);

де ім'я - імена змінних або типізованих констант. Значення, що вводяться, задаються у вигляді припустимих у Паскалі констант і розділяються будь-якою кількістю пробілів. Для закінчення уведення варто нажати клавішу Enter. Оператор уведення можна записати і як READLN, при уведенні числових змінних вони еквівалентні. Крім того, оператор READLN без списку в дужках можна використовувати для організації затримки в роботі програми - він буде очікувати натискання клавіші Enter.

Найпростіша процедура виводу записується у вигляді:

WRITE(вираз, вираз,...);

або

WRITELN(вираз, вираз,...);

Вивести можна будь-який вираз, якщо необхідно вивести текст, він заключається в апострофи. Оператор WRITELN відрізняється від оператора WRITE тим, що після виводу відбувається перехід на новий рядок. Можна використовувати оператор WRITELN без списку виводу для пропуску рядка.

 

 

Алгоритм рішення задачі

Суть алгоритму рішення даної задачі полягає в тому щоб "переглядати" масив по рядках й знаходити в кожному рядку пари (0:число), а потім міняти їх місцями між собою й так доти, поки в рядку таких пар не виявиться.

Складемо блок схему алгоритму

Блок схема алгоритму