русс | укр

Мови програмуванняВідео уроки php mysqlПаскальСіАсемблерJavaMatlabPhpHtmlJavaScriptCSSC#DelphiТурбо Пролог

Компьютерные сетиСистемное программное обеспечениеИнформационные технологииПрограммирование


Linux Unix Алгоритмічні мови Архітектура мікроконтролерів Введення в розробку розподілених інформаційних систем Дискретна математика Інформаційне обслуговування користувачів Інформація та моделювання в управлінні виробництвом Комп'ютерна графіка Лекції


Умовні оператори.


Дата додавання: 2013-12-23; переглядів: 1554.


 

Умовні оператори - це такі оператори, за допомогою яких можливо впливати на послідовність виконання операторів програми.

 

 

IF. . THEN (якщо.. то)

IF.. THEN.. ELSE (якщо ..то. . інакше)

Якщо перехід здійснюється при виконанні якої-небудь умови -це умовний оператор.

В операторі IF. . THEN між ними записується умова. Якщо ця умова виконується, то будуть вуконуватися і оператори, що йдуть після THEN.

 

Приклад: IF x<3 THEN Writeln(x);

 

Умовний перехід можливо відобразити графічно таким чином:

 

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

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

y=Ln x, якщо x>0

, якщо x0

 

Оператор, що реалізує ці обчислення для деякого значення аргументу х має вигляд :

 

IF x>0 THEN у: =1п(х)

ELSEy:=exp(x);

 

Якщо умовний оператор не має конструкції ELSE, то така форма оператора називається скороченою. Форма запису оператора IF з ELSE називається повною. Перед ELSE; ніколи не ставиться. На клавіатурі немає знаків #,.,. Замість них користуються < >,<=,>=.

Приклад:Якщо значення змінної t не дорівнює 0 і при цьому

котангенс від t<0.5,.moдi змінити знак t; якщо t=0, то присвоїти t=1.

if t<>0 then

if (cos(t)/sin(t))<0.5 then

t:= -t else t:=l;

 

Розглянемо приклади програм, що містять умовний оператор:

Приклад 1: Задана функція

 
 


0, якщо x0

y=

якщо x>0

Написати програму обчислення у по х.

Program PR1;

Var x,y: integer;

Begin

Read(x);

If x<=0 then y:=0

Else y:=sqr(x)*x;

Writeln(‘y= ',y:3);

End.

Приклад2: Дано 2-а числа. Якщо перше більше другого по абсолютній величині, то необхідно зменшити перше в 5 разів. Інакше залишити числа без змін. Написати програму:

 

Program PR2;

Var x,y: real;

Веgin

Read (x,y);

If abs(x)>abs(y) then x: =x/5;

Write ('x= ',x:5:2, 'y= ',y:5:2);

End.

 

Приклад 3:Дано 3 нерівні числа А,В,С. Обчислити та надрукувати значений z = квадрату більшого з них. Побудувати блок-схему.

Program PR;

VarA,B,C: real;

Begin

Read(A,B,C);

If A>B then Z: =A else Z: =B;

If С>Z thenZ:=C;

Z:=SQR(Z);

Wrlteln('Z= ',Z:4;2);

End.


<== попередня лекція | наступна лекція ==>
Одночасне використання дійсних та цілих чисел. | Циклічні процеси.


Онлайн система числення Калькулятор онлайн звичайний Науковий калькулятор онлайн