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

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

Ақшам болса дүкенге барамын,немесе бармаймын Ақшам болса және күн ашық болса егер онда онда әйтпесе бітті бітті If then else If then Жай шарт =, =- үлкен немесе тең,,<>-тең емес Құрама шарт Логикалық операциялар қолданылады Шамалар арасындағы қатысты көрсететін қызметші сөздер және - аnd, немесе- or, емес-not

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

Блок-схема Басы A>B A,B max:=A max:=B Y соңы иә жоқ А=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 У=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 3 с шики

Есеп 2.Квадрат теңдеуді шешу алгоритмі мен блок-схемасы және программасын жазу ах 2 +вх+с=о а,в,с-кез келген сан (а=о) D<0 - шешімі жоқ D=0 -бір шешімі бар D>0 -екі шешімі бар D=b 2 -4ac X 1 = X 2 =

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

басы D:=b 2 -4ac D<0 иәжоқ У:=шешімі жоқ D=0D=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.Квадратқа дөңгелек сиғызу алг. мен программасы алг кв дөң(арг нақ S 1,S 2,нәт лит у) басы нақ А А:=4S 1 - π S 2 егер А<=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. 4 5 / 0.3/ Cimaidi 1 2 /-2/ ciadi

Үйге Кітап 36 бет-41 бет оқу 1) 43 бет 7 тапсырма 1 шартты аласыз Х<4 2) Қапшықта ақ шар,қара шар орналасқан неше ақ шар бар? 3)Мектепте шығарған 1,3 есептерге блок-схема құрыңыз

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