Оператори мови програмування Паскаль
Тема 7. Оператори мови програмування Паскаль
7.1. Загальна характеристика операторів
Оператори містяться у частині виконання (begin ... end.) та описують дії, що повинні бути виконані під час роботи програми.
Оператор може бути: - простим;
- структурованим.
Простий оператор - такий, що не містить в собі інших операторів. Це:
- оператор надання (:=);
- виклик процедури;
- безумовний перехід на позначку: goto m;
Структуровані оператори - можуть містити у собі інші оператори. Це:
- складений;
- умовний;
- циклу;
- приєднання.
7.2. Складений оператор
Складений оператор - група операторів, що містяться в операторних дужках:
Begin
<оператори>
end;
Операторні дужки begin ... end; є розподілювачами, тому після begin та перед end точка з крапкою (;) не обов'язкові. Поява (;) у ціх місцях сприймається як пустий оператор, що не містить ні яких дій.
Операторні дужки використовуються для об'єднання групи операторів в один. Уся частина виконання є складеним оператором.
Приклад
Begin
: (будь-які інші оператори)
begin
readln(x);
f:=sqr(x)+3+x+0.1; складкний частина
writeln(‘f=’,f); оператор виконання
end;
:
End.
7.3. Умовні оператори
7.3.1. Оператор if
Загальний вигляд:
IF <вираз V> THEN <оператор S1> [ELSE <оператор S2>];
Де: V - вираз логічного типу (умова, за якою виконується оператор S1 чи S2). S1,S2 - один простий оператор (може бути складеним).
Ілюстрація роботи оператора за допомогою блок-схеми та діаграми дій:
Повний oператор IF:
(V)
(else)
S2
false
S1
true
(then)
S1
S2
Скорочений варіант оператора IF:
false (V)
true
S1
(then)
S1
Приклад. Обчислити функцію
X1/2, x>0
F(x)=
0, x<=0
а) оператори S1, S2 – прості.
program my_func;
{обчислювання функції f(x)}
var x,f: real;
begin
writeln('введіть значення x=');
readln(x);
if x>0 then f:=sqrt(x)
else f:=0;
writeln('функція дорівнює',f);
end.
б) обчислювання тієї ж функції, проте оператори S1, S2 - складені.
program my_func;
{обчислювання функції f(x)}
var x,f: real;
begin
writeln('введіть значення x=');
readln(x);
if x>0 then begin
{ обчислювання функції для x додатного}
writeln ('x>0');
writeln('f=',sqrt(x));
end
else begin
{ обчислювання функції для x від'ємного}
writeln('x<=0');
writeln('f=',0);
end;
end.
Вкладений оператор IF
Умовний оператор if може містити в свою чергу також оператор if, наприклад:
If v1 then if v2 then s1 else s2
FALSE
TRUE
(V1)
FALSE
(V2)
S1
TRUE
S2
S1
Проте, щоб з’ясувати процес виконання такої канструкції, треба знати, як обробляється оператор IF. Для уникнення помилки краже використовувати операторні дужки:
IF V1 THEN BEGIN
IF V2 THEN S1
ELSE S2
END;
Приклад: Чи можна побудувати трикутник зі сторонами a,b,c?
а)
program triangle;
{в програмі визначається, чи можна побудувати трикутник зі сторонами a,b,c }
var a,b,c: real;
begin
writeln('Введіть сторони триктника a,b,c :');
readln(a,b,c);
if a<b+c then begin
if b<a+c then begin
if c<b+a then
writeln (' Трикутник побудувати можна ');
end
end
end.
б) скорочений варіант тієї ж програми, який використовує складну умову переходу у операторі if.
program triangle;
{ скорочений варіант програми triangle}
var a,b,c: real;
begin
writeln('введіть сторони тркутника a,b,c:');
readln(a,b,c);
if (a>=b+c) or (b>=a+c) or (c>=b+a)
then writeln('трикутник побудувати неможна')
else writeln('трикутник побудувати можна');
end.