If <шарт> Then Begin <1-оператор>;
<2-оператор>;
…
;
End Else Begin <1-оператор>;
<2-оператор>;
…
;
End;
If … Then конструкциясы
If <шарт> Then
Begin <1-оператор>;
<2-оператор>;
…
;
End;
Циклдік құрылымды алгоритмдерді үш түрлі жолмен ұйымдастыруға болады. Ол үшін арнайы операторлар қолданылады
Алдын ала шартты тексеру операторы:
While <шарт> do
Begin
<циклдің денесі>;
End;
Келесі шарт бойынша циклді ұйымдастыру, яғни Repeat операторының жалпы жазылуы:
Repeat
<циклдің денесі>;
Until <шарт>;
Алдын ала шартты тексеру циклының келесі шартты тексеру циклынан айырмашылығы - цикл денесі шарт ақиқат кезде ғана орындалады. Ал циклдың екінші түрінде қойылған шартқа тәуелсіз бірінші цикл денесі орындалады. Сосын шарт тексеріледі. Демек шарт ақиқат болмаса, цикл денесі кемінде бір рет орындалады.
П араметрлі қайталану For операторы.
For X:=M1 to M2 do
Begin
S1;S2; … ;Sn;
End;
X – циклдің параметрі.
M1 – цикл параметрінің бастапқы мәні
M2 – цикл параметрінің соңғы мәні
S1, … , Sn – цикл параметріне тәуелді қайталанып орындалатын оператор немесе цикл денесі.
Тапсырма 1. Екі бүтін санның ең үлкен ортақ бөлгішін(ЕYОБ) табу керек.
