>Толық оператордың жазылу түрі:
егершартонда1 операторәйтпесе2 оператор орындалады.
IF
THEN
ELSE;
ІІ топЕгер шарттың мәні «ақиқат» болса,THENсөзінен кейінгі оператор, ал мән «жалған» болса,ELSEсөзінен кейінгі оператор орындалады. Қысқа оператордың жазылу түрі:
IF
THEN ;
IFшартты операторы:IF(егер) операторы программадағы іс-әрекеттердің орындалу реттілігінөзгертетінмүмкіндіктің ең кең тарағантәсілі болып табылады. Оныңсинтаксистік диаграммасы:
IFсөзінен соңжазылатын өрнек түріндеберілген шарт алдын ала есептеледі, оның нәтижесі логикалық (boolean- бульдік)типте болады. Егер ол шарттың мәніTRUEақиқат болса, ондаTHEN(онда)ELSE(әйтпесе)сөзінен кейінгі2-оператор атқарылмайды. Екінші жағдайда шарт мәніFALSE(жалған) болса, ондаELSEсөзінен кейінгі2- оператор орындалып, 1-оператор орындалмайды. IFоператорыбірініңішінебірікіріп,қабаттасыптаорындалабереді.
Блок-схема
Тармақталу командасы
Алгоритмдік тіл
1-серия
2-серия
шарт
иә
жоқ
егер
онда
әйтпесе
бітті
Паскаль тілі
IFTHENELSE
Алгоритмдік тіл
Блок-схема
IV. Практикалық жұмыс:
Тең
Үлкен
Үлкен немесе тең
0 - ге тең болса, онда х - ті екіге арттыр, әйтпесе х - ті екі еселе.
Есептіңпрограммасы:
Program esep1;
Var x, y: real;
Begin
Readln(x);
If x0 then y:x2 else y:2x;
Writeln(y, y);
End.
2 тапсырма. Пернетақтадан трамвай билетінің нөмірі (1орынды6сан)е нгізіледі. Билеттің «бақытты» нөмір екенін анықтайтынпрограммақұрукерек. Бақыттыбилеттіңалғашқы3цифрыныңқосындысы соңғы3 цифрының қосындысынатең.
Program esep2;
Uses crt;
Var x, y, z, a, b, c, S, S1: real;
Begin
Clrscr;
Writeln(bilet nomerin engiz…);
Readln(x, y, z, a, b, c);
S:
Страницы: << < 3 | 4 | 5 | 6 > >>