Виды алгоритмов

1. Виды алгоритмов

Автор: учитель информатики МКОУ СОШ №5
Назарова Т.В.

2. Алгоритм

понятное
и
исполнителю
точное
предписание
выполнить
последовательность
конечную
действий,
приводящую от исходных данных к
искомому результату.
алгоритм

3. Виды алгоритмов

1. Линейный
2. Ветвление
3. Циклический

4. Линейный алгоритм

Алгоритм
называется
линейным, если все его
действия
выполняются
последовательно друг за
другом от начала и до
конца.
1
2
3
4
5
6
7

5. Пример линейного алгоритма

Program square1;
Var A,B,S: integer;
Begin
writeln ('введите длины сторон прямоугольника');
read ( A,B );
S:=A * B;
println ('площадь прямоугольника = ', S );
End.

6. Ветвление

Алгоритм
называется
ветвящимся,
если в зависимости от выполнения
условия совершаются те или иные
действия.

7. Виды ветвлений

1. Полное
Если число делится на 2, то оно четное, иначе оно
нечетное.
2. Неполное
Если на улице идёт дождь, то надо взять зонт.
3. Последовательное
Если первое число больше второго, то наибольшим
является первое.
Если второе число больше первого, то наибольшим
является второе.
4. Вложенное (одно условие внутри другого).

8.

Полное ветвление
if условие then действие1 else действие2;
Program Z1;
Var x: integer;
Begin
write( ‘x=’ ); readln( x);
if x>0 then write(‘положительное‘) else
print(‘неположительное‘);
End.

9.

Неполное ветвление
if условие then действие1;
Program Z2;
Var x: integer;
Begin
write( ‘x=’ ); readln( x);
if x>0 then write(‘положительное‘);
if x<=0 then write(‘неположительное‘);
End.
Последовательное ветвление

10.

Примеры простейших программ
3. Если заданное число больше 100, то уменьшить
его в 5 раз, иначе увеличить на 100.
Program P3;
Var a:real;
Begin
write( ‘a=’ );readln(a);
if a>100 then a:=a/5 else a:=a+100;
write(‘a=’,a);
End.

11.

Способы оформления ветвления
if условие then действие1 else действие2;
ИЛИ
if условие
then begin группа действий1; end
else begin группа действий2; end;

12.

Задача. Алгебра
4. Найти значение функции
для заданного значения х.
Program Alg6;
Var x,y:real;
Begin
write( ‘x=’ );readln(x);
if x-1=0 then writeln ( ‘нет решений’);
if x-1<>0 then begin y:=(3*x*x+5*sin(x))/(x-1);
writeln ( ‘y = ’ , y); end;
End.

13.

Логические операции
not – НЕ (отрицание условия);
and – И (одновременное выполнение условий);
or – ИЛИ (выполнение хотя бы одного условия).
Program P7;
Var n:integer;
Begin
write( ‘n=’ );readln(n);
if (n>9) and (n<100) then write( ‘двузначное’) else
write(‘недвузначное’);
End.

14.

Циклический алгоритм
Циклический
алгоритм
содержит
повторяющуюся последовательность действий.
Виды:
1) с параметром
повторений);
(если
известно
количество
2) с предусловием (действия повторяются до тех пор,
ПОКА выполняется некоторое условие);
3) с постусловием (действия повторяются до тех пор,
ПОКА не выполнится некоторое условие).

15.

Цикл с параметром
for имя параметра:=начальное значение
to конечное значение do тело цикла;
Program P1;
Var i:integer;
Begin
for i:=1 to 15 do print(‘# ’);
End.

16.

Цикл с параметром
Program P2;
Var i,N:integer; s:string;
Begin
print(‘N=‘); readln(N);
print(‘Знак: ‘); readln(s);
for i:=1 to N do write(s);
End.

17.

Цикл с параметром
Program P3;
Var i,N,S:integer;
Begin
print(‘N=‘);readln(N);
for i:=1 to N do S:=S+i;
write(‘S=’,S);
End.

18.

Цикл с параметром
Program P4;
Var i,N,S:integer;
Begin
print(‘N=‘);readln(N);
for i:=1 to N do
if i mod 2<>0 then S:=S+i;
write(‘S=’,S);
End.

19.

Цикл с предусловием
имя параметра:=начальное значение;
while условие с параметром do тело цикла;
Program P4_2;
Var i,N,S:integer;
Begin
print(‘N=‘);readln(N);
i:=1;
while i<=N do begin
S:=S+i;i:=i+2; end;
print(‘S=’,S);
End.