Алгоритм түрлері

Сызықтық алгоритмның блок-схемасы

«басы» блогі

басы

енгізу a , b

«енгізу» блогі

c := a + b;

«процесс» блогі

шығару c

«шығару» блогі

соңы

«соңы» блогі

Тапсырмалар

"4": Үш сан енгізіп,олардың қосындысын және көбейтіндісін табу.

Мысал:

Үш сан енгіз:

4 5 7

4+5+7=16

4*5*7=140

"5": Үш сан енгізіп, олардың қосындысын, көбейтіндісін және арифметикалық ортасын табу.

Мысал:

Үш сан енгіз:

4 5 7

4+5+7=16

4*5*7=140

(4+5+7)/3=5.33

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

Есеп. Екі бүтін сан енгізіп,экранға олардың үлкенін шығару.

Шығару амалы: бірінші сан екінші саннан үлкен болса, біріншісін, ал егер кіші болса екіншісін экранға шығару.

Ерекшелігі: атқарушының әрекеті кейбір шарттардың орындалуына байланысты болады ( егер …әйтпесе … ).

Қадамдардың тізбектеп орындалуы кейбір шарттарға байланысты болатын алгоритмдерді тармақталу алгоритмдері деп атайды.

b? max:= a; max:= b; шығару max соңы ? Егер a = b? 4" width="640"

Нұсқа 1. Блок-схема

басы

«таңдау» блогі

енгізу a,b

Тармақталудың толымды түрі

иә

жоқ

a b?

max:= a;

max:= b;

шығару max

соңы

?

Егер a = b?

4

b then begin end else begin end ; writeln (‘Екі санның үлкені', max); end. шартты оператордың толымды түрі max := a ; max := b ; 4" width="640"

4

Нұсқа 1. Программа

program qq;

var a, b, max: integer;

begin

writeln(‘Екі бүтін сан енгіз');

read ( a, b );

if a b then begin

end

else begin

end ;

writeln (‘Екі санның үлкені', max);

end.

шартты оператордың толымды түрі

max := a ;

max := b ;

4

4

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

if then begin

{егер шарт орындалса, не істеу керек}

end

else begin

{егер шарт орындалмаса, не істеу керек}

end ;

Ерекшеліктері:

• else - тің алдында нүктелі үтір болмауы керек екінші бөліктің ( else …) болмауы да мүмкін (толымсыз түрі) егер блокта бір ғана оператор болса, begin мен end сөздерін жазбауға да болады
• else - тің алдында нүктелі үтір болмауы керек
• екінші бөліктің ( else …) болмауы да мүмкін (толымсыз түрі)
• егер блокта бір ғана оператор болса, begin мен end сөздерін жазбауға да болады

4

b then begin a := b; end else b := a; end ; if a b then begin a := b; else begin b := a; end ; end begin if a b then begin a := b; end; else begin b := a; end ; if a b then begin a := b; end else b a begin b := a; end ; end begin 4" width="640"

4

Қай жері дұрыс емес?

if a b then begin

a := b;

end

else

b := a;

end ;

if a b then begin

a := b;

else begin

b := a;

end ;

end

begin

if a b then begin

a := b;

end;

else begin

b := a;

end ;

if a b then begin

a := b;

end

else b a begin

b := a;

end ;

end

begin

4

a? max:= b; шығару max соңы 8" width="640"

4

Нұсқа 2. Блок-схема

басы

енгізу a,b

max:= a;

тармақталудың толымсыз түрі

иә

жоқ

b a?

max:= b;

шығару max

соңы

8

a then max := b; writeln (‘Екі санның үлкені', max); end. шартты оператордың толымсыз түрі 8" width="640"

8

Нұсқа 2. Программа

program qq;

var a, b, max: integer;

begin

writeln(‘Екі бүтін сан енгіз');

read ( a, b );

max := a;

if b a then

max := b;

writeln (‘Екі санның үлкені', max);

end.

шартты оператордың толымсыз түрі

8

b max := a; 8" width="640"

8

Нұсқа 2Б. Программа

program qq;

var a, b, max: integer;

begin

writeln('Екі бүтін сан енгіз');

read ( a, b );

max := b;

if ??? then

???

writeln ( ' Екі санның үлкені ' , max);

end.

a b

max := a;

8

b then begin a := b; end; else b := a; if a b then begin a := b; else b := a; a := b end if a b then a := b; else b := a; end; if a b then else begin b := a; end ; if b = a then b := a; a := b 8" width="640"

8

Қай жері дұрыс емес?

if a b then begin

a := b;

end;

else b := a;

if a b then begin

a := b;

else b := a;

a := b

end

if a b then

a := b;

else b := a; end;

if a b then

else begin

b := a;

end ;

if b = a then

b := a;

a := b

8

8

Тапсырмалар

"4": Үш сан енгізіп олардың үлкенін табу.

Мысал:

Үш сан енгіз:

4 15 9

Ең үлкен сан 15

"5": Бес сан енгізіп олардың үлкенін табу.

Мысал:

Бес сан енгіз:

4 15 9 56 4

Ең үлкен сан 56

8