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

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

Батыс Қазақстан облысы

Теректі ауданы

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

Ақшам болса дүкенге барамын, немесе бармаймын

Ақшам болса және күн ашық болса . . .

Ақшам болса дүкенге барамын, немесе бармаймын

Ақшам болса және күн ашық болса . . .

егер егер

онда онда

әйтпесе бітті

бітті

If then else If then

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

Құрама шарт Логикалық операциялар қолданылады

Шамалар арасындағы қатысты көрсететін қызметші сөздер

және - аnd, немесе- or, емес-not

Тармақталу командасының толық және қысқаша жазылу мен олардың блок-схемаларымен таныстық

Мысалы: А және В сандары берілген.

Екі сан үлкенін табу.

егер А>В

онда max:=A

әйтпесе max:=B

бітті

Блок-схема

Басы

A>B

A, B

max:=A

max:=B

соңы

иә

жоқ

А=3, В=-5

3>- 5 иә

Max=3

А=7, В=12

4>12 жок

Max=12

Толық алгоритмі мен программасын құрамыз

Алг ЕСҮТ(арг нақ А, В, нәт лит max)

басы

енгізу А, В

егер А>B

онда max:=A

әйтпесе max: =В

бітті

шығару max

Соңы

/max=y/

Program ECYT;

Var a, b, y:real;

begin

readln(a, b) ;

if a>b then y:=a else y:=b;

writeln(‘y=‘, y) ;

end.

-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+вх+с=о

а, в, с-кез келген сан (а=о)

D<0 - шешімі жоқ

D=0 -бір шешімі бар

D>0 -екі шешімі бар

D=b2-4ac

X1=

X2=

Алгоритмі

алг КТШ(арг нақ а, в, с, нәт нақ х1, х2, лит у)

басы нақ D

D:=b2-4ac

егер D<0

онда у:=“шешімі жоқ”

әйтпесе егер D=0

онда x:=-

әйтпесе х1:=

х2:=

бітті

соңы

басы

D:=b2-4ac

D<0

иә

жоқ

У:=“шешімі жоқ”

D=0

x:=-

х1:=

х2:=

соңы

иә

жоқ

Блок-схема

Программалау тілі

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, нәт лит у)

басы нақ А

А:=4S1-π S2

егер А<=0

онда у:=“дөң кв сыяды”

әйтпесе у:=“дөң кв сыймайды”

бітті

соңы

var s1, s2, a, y:real;

begin

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. Паскал тілінде жазылуы қандай?

Ұқсас жұмыстар

Тармақталу алгоритмдері

Алгоритм командалары

Жұмбақ сан

Сызықтық алгоритм Тармақталу алгоритмі Циклдік алгоритм

Тармақталған алгоритмдер

Шығару операторы

Тексеру және таңдау операторлары. Циклдық программалауға арналған командалар

Шартты көшу операторы

Оралымды алгоритмдер

Тармақталған алгоритмдер. Тармақталу командасы

Пәндер

Қазақ тілінде жазылған рефераттар, курстық жұмыстар, дипломдық жұмыстар бойынша біздің қор #1 болып табылады.

Ақпарат

Қосымша

Email: info@stud.kz