Саба?ты? та?ырыбы: Тарма?талу операторы.Шартты к?шу операторлары

ТаKырыбы: ТармаKталу ж
·не таSдау операторы.
Д
·ріс мазмaны:

Тарматалу командасыны@ ыса ж не толы тVріні@ жазылуы.
?рама шарттар, рама операторлар.
Та@дау операторыны@ жалпы тVрі.

Шартты оператор Kандай да бір шартты тексеріп, оныS н
·тижесіне байланысты белгілі бір
·рекетті орындауды ж_зеге асырады.

ОныS жазылу _лгісі:

IF шарт THEN 1-оператор ELSE 2-оператор;
IF шарт THEN оператор;

1-жаCдай шартты оператордыS жазылуыныS толы т_рі, 2-жаCдай ыса т_рі деп аталады.

Мысал 1. Берілген _ш санныS _лкенін табыSдар.
Program max3;
Var a,b,c,max1, max: integer;
begin

Write (3 санды енгіз’); read (a,b,c);
if a>b then max1:=a else max1:=b;

if c>max1 then max:=c else max:=max1; Writeln (3 санныS _лкені=’, max);

end.

Егер then, else Kызметші с™здерінен кейін бір емес, бірнеше оператор жазылса, олар рама оператор деп аталады ж
·не begin, end операторлыK жаKшаCа алынады.

Егер шарттыS саны біреуден артыK болса, онда ол рама шарт деп аталады. Jaрама шарттар арасына and (ж
·не), or (немесе), not (емес) Kызметші с™здері жазылады ж
·не ж
·й шарттар жаKшаCа ( ) алынып жазылады.

0·5 шарты Паскальда былайша жазылады: (х
·0) and (х
·
·5)

Мысал 2. Екі б_тін санныS _лкені мен кішісін табыSдар.
Var a,b, max, min: integer;
begin
read (a,b);

if a>b then begin max:=a; min:=b end else begin max:=b; min:=a end;

Writeln (max=’, max, min=’, min)
end.

Мысал 3. ЖазыKтыKта берілген н_кте центрі (2,3) н_ктесіндегі, ішкі радиусы 1-ге, сыртKы радиусы 2-ке теS саKинаCа тиісті бола ма?
Program m3;
const r1
·1; r2
·2;

var x,y:real;
begin
Write ('н_кте координаларын енгіз); read(х, у);

if (sqr(х-2)+sqr(у-3)
·
· sqr(r1)) and (sqr(х-2)+sqr(у-3)
·
· sqr(r2)) then Writeln (н_кте саKинаCа тиісті) else writeln (тиісті емес)

end.

ТаSдау операторы арKылы программадаCы м_мкін болатын бірнеше оператордыS біреуі таSдалады. Та@дау параметрі Real ж
·не String типтерінен басKа кез-келген типті Kабылдайды.

ТаSдау операторыныS Kaрылымы:
сase рнек of

1- траты: 1- оператор;
2- траты: 2- оператор;

n- траты: n- оператор

else оператор

end;