Оператор умови if

Умовний оператор (команда розгалуження) є одним із самих поширених засобів, що змінюють лінійний порядок виконання операторів програми. Він може приймати одну з наступних форм:

if < умова > then

Begin

серія1;

End

Else

Begin

серія 2;

end;

if < умова > then

Begin

<серія>;

end;

Перша форма цього оператора називається повною формою команди розгалуження, а друга – скороченою.

Умова може бути простою або складеною. Складені умови утворюються за допомогою логічних операцій and, or, not. В запису умов можуть використовуватися всі можливі операції відношення. Результат виразу має булевський тип.

У повній формі команди умовного переходу виконується <серія 1>, якщо умова істинна, і <серія 2>, якщо вона хибна. В скороченій формі – серія виконується тільки у випадку, якщо умова істинна, у протилежному випадку команда розгалуження закінчується і виконується наступний за нею оператор.

Один оператор if може входити до складу іншого. У цьому випадку говорять про вкладеність операторів. При вкладеності операторів кожне else відповідає then, що йому передує.

Задача 1. Обчислити податок із заробітної плати в залежності від її величини за формулою:

Програма розв'язання задачі на мові Паскаль.

Program podatok;

Var P,Z:real;

Begin

writeln('Введіть значення величини заробітної плати :');

write('z=');

readln(Z);

if Z<=17 then P:=0

else if (Z>17) and (Z<85) then P:=0.1 *Z

else P:=0.15*(Z-85)+6.80;

writeln('Прибутковий податок дорівнює : ');

writeln('Z=',Z:5:2,' P=',P:5:2);

End.