Тармақталу командасы




Презентация қосу
Батыс Қазақстан облысы
Теректі ауданы
Подстепный қазақ орта мектебінің информатика мұғалімі Айткалиева
Баян Сабырғалиқызы

ТАРАУ-3
Тармақталған алгоритмдер

Тармақталу
командасы
Ақшам болса дүкенге
барамын,немесе бармаймын
Ақшам болса және күн ашық болса..........
Ақшам болса дүкенге барамын,немесе
бармаймын
Ақшам болса және күн ашық болса..........
егер егер
онда онда
әйтпесе бітті
бітті

If then else If then

Жай шарт =,<=- ,>=- ,< ,>,<>-тең емес
кіші немесе тең үлкен немесе тең

Құрама шарт Логикалық операциялар қолданылады
Шамалар арасындағы қатысты көрсететін қызметші сөздер

және - аnd, немесе- or, емес-not
Тармақталу командасының толық
және қысқаша жазылу мен олардың
блок-схемаларымен таныстық
Мысалы: А және В сандары берілген.
Екі сан үлкенін табу.
егер А>В
онда max:=A
әйтпесе max:=B
бітті
Басы

Блок-схема A,B

жоқ
иә
A>B

А=3,В=-5
3>- 5 иә
max:=A max:=B Max=3
___________
А=7,В=12
4>12 жок
Max=12
Y

соңы
Толық алгоритмі мен программасын
құрамыз
Алг ЕСҮТ(арг нақ А,В, нәт лит max)
басы
енгізу А,В
егер А>B Program ECYT;
онда max:=A Var a,b,y:real;
әйтпесе max: =В begin
бітті readln(a,b);
if a>b then y:=a else y:=b;
шығару max
writeln(‘y=‘,y);
Соңы
end.

/max=y/
-5
У=3
Есеп 1.Үш қарбыз біреуі піспегенін табу.
Салмағы піскен қарбыз салмағынан ауыр.
Піскен қарбыздар салмақтары тең

Үш шама енгіземіз о1,о2,о3
Піскен қарбыздар тең о1=о2,онда о3 шикі
әйтпесе о1>о2 ,онда о1 шикі
әйтпесе о2 шикі

Алгоритмі мен программасын құрыңыз
Алг шикі қар(нақ о1,о2,о3,лит у)
арг о1,о2,о3
нәт у
басы
егер о1=о2
онда у:=“о3 шикі қар”
әйтпесе
егер о1>о2
онда у:=“о1 шикі қар”
әйтпесе у:=“о2 шикі қар”
бітті
бітті
соңы
Program cар;
var a,b,с:real;
begin
readln(a,b,c);
if a=b then writeln (‘c шики’) else
begin if a>b then writeln (‘a шики’)
else writeln (‘b шики’);
end
end. 2
с шики
Есеп 2.Квадрат теңдеуді шешу
алгоритмі мен блок-схемасы және
программасын жазу
ах2+вх+с=о
а,в,с-кез келген сан (а=о)
D<0 - шешімі жоқ
D=b2-4ac
D=0 -бір шешімі бар b D
X1=
D>0 -екі шешімі бар 2a

b D
X2= 2a
Алгоритмі

алг КТШ(арг нақ а,в,с, нәт нақ х1,х2,лит у)
басы нақ D
D:=b2-4ac
егер D<0
онда у:=“шешімі жоқ”
әйтпесе егер D=0 b
онда x:=- 2a b D
әйтпесе х1:= 2a
b D
х2:= 2a
бітті
бітті
соңы
Блок-
схема
басы

D:=b2-4ac

иә жоқ
D<0

иә жоқ
У:=“шешімі жоқ” D=0

b D
b 2 a D
b х1:=
x:=- b 2 a D
2a х2:= 2a

соңы
Программалау тілі

var a,b,c,d:real;
begin
writeln(‘a,b,c engis’);
readln(a,b,c);
D:=sqr(b)-4*a*c
If d<0 then writeln(‘жок’)
else begin writeln(‘бар’);
writeln(‘x1:=(-b+sqrt(d))/(2*a)’);
writeln(‘x2:=(-b-sqrt(d))/(2*a)’);
end;
end.
Есеп 3.Квадратқа дөңгелек
сиғызу алг. мен программасы
алг кв дөң(арг нақ S1,S2,нәт лит у)
басы нақ А
var s1,s2,a,y:real;
А:=4S1-π S2
begin
егер А<=0 writeln(‘s1,s2 engis’);
онда у:=“дөң кв сыяды” readln(s1,s2);
a:=4*s1-3.14*s2;
әйтпесе у:=“дөң кв сыймайды” If a<=0 then writeln(‘y:=ciadi’)
бітті else writeln(‘y:=cimaidi’);
соңы end.
5 / 0.3/
Cimaidi
2 /-2/
ciadi
Үйге
Кітап 36 бет-41 бет оқу
1) 43 бет 7 тапсырма
1 шартты аласыз Х<4
2) Қапшықта ақ шар,қара
шар орналасқан неше ақ шар бар?
3)Мектепте шығарған 1,3
есептерге блок-схема құрыңыз
Сұрақтарға жауап жаз

1.Тармақталу командасының жазылу түрі
қандай?
2.Блок-схемасын сызып беріңіз?
3.Паскал тілінде жазылуы қандай?

Ұқсас жұмыстар
Тармақталу алгоритмдері
Алгоритм командалары
Жұмбақ сан
Сызықтық алгоритм Тармақталу алгоритмі Циклдік алгоритм
Тармақталған алгоритмдер
Шығару операторы
Тексеру және таңдау операторлары. Циклдық программалауға арналған командалар
Шартты көшу операторы
Оралымды алгоритмдер
Тармақталған алгоритмдер. Тармақталу командасы
Пәндер