Алгоритмические структуры
Алгоритм Алгоритм - понятное и точное предписание исполнителю выполнить конечную последовательность команд, приводящую от исходных данных к искомому результату.
Полное ветвление Полное ветвление Неполное ветвление Неполное ветвление Полное ветвление Полное ветвление Неполное ветвление Неполное ветвление Цикл с предусловием Цикл с предусловием Цикл с постусловием Цикл с постусловием Цикл с параметром Цикл с параметром Цикл с предусловием Цикл с предусловием Цикл с постусловием Цикл с постусловием Цикл с параметром Цикл с параметром Задача 4 Задача 2 Задача 3 Задача 1
Линейная алгоритмическая структура Алгоритм, в котором команды выполняются последовательно одна за другой, называется линейным алгоритмом. {Вычисление гипотенузы и площади треугольника} program treugolnik; var a,b,c,s:real; begin write ( 'Введите катеты a, b: '); readln (a, b ); c := sqrt ( a*a + b*b ); s := 1 / 2 * a * b; writeln ('Гипотенуза=', c); writeln ('Площадь треугольника=', s); end.
Алгоритмическая структура полное ветвление В алгоритмической структуре "ветвление" в зависимости от истинности или ложности условия выполняется одна или другая серия команд. if if then then else ;
Алгоритм, в котором команды выполняются последовательно одна за другой, называется линейным алгоритмом. if if then then ; Алгоритмическая структура неполное ветвление
Вычислить значение функции для заданного х. Вычислить значение функции для заданного х. program vyrazh; var x, y : real; begin write ('Введите х:'); readln(x); if x– 3 = 0 then write ('При х=3 значение функции не определено'); else begin y :=(x*x+5*х+2)/(x–3); write ('y=', y); end end.
Алгоритмическая структура цикл с предусловием В алгоритмическую структуру цикл входит серия команд, выполняемая многократно. Такая последовательность команд называется телом цикла. Цикл по условию, в котором тело цикла выполняется, пока истинно условие. while while do do ;
Вводить числа, пока не встретится 0. Определить сумму и количество введенных чисел. program summa; var s,x:real; k:integer; begin s:=0;k:=0; write('Введите число:'); readln(x); while x0 do begin s:=s+x; k:=k+1; write('Введите число:'); readln(x); end; writeln('Сумма чисел=',s,' их количество=', k); end.
Алгоритмическая структура цикл с постусловием Цикл называется циклом с постусловием, если условие выхода из цикла стоит в конце, после тела цикла. Цикл с постусловием выполняется обязательно, как минимум, один раз, независимо от того, истинно условие или нет. repeat repeat until until ;
Вычислить сумму ряда с точностью program summa; {Вычисление суммы ряда} var i:integer; an,s:real; begin s:=0; i:=1; an:=1; repeat s:=s+an; i:=i+1; an:=1/(i*i) until an
Алгоритмическая структура цикл с параметром Алгоритмическая структура цикл со счетчиком используется, если известно заранее, какое число повторений тела цикла необходимо выполнить. 1 вариант for:= to for := to do do ; 2 вариант for:= downto for := downto do do ;
Вычислить сумму ряда var i,n:integer; s:real; begin write('Введите n:'); readln(n); s:=0; for i:=1 to n do s:=s+sqrt(i); writeln('Сумма ряда=',s:6:3); end.