Команда 1 Команда 2 Команда N... Как называются алгоритмы такой структуры? Линейные
Условие Серия 1Серия 2 Да Нет Разветвляющиеся (полное ветвление) Как называются алгоритмы такой структуры?
Условие Серия 1 Да Нет Как называются алгоритмы такой структуры? Разветвляющиеся (неполное ветвление)
Вспоминаем! Структура программы на turbo Pascal: program ; –uses ; –label ; –const ; –type ; –var ; –procedure ; –function ; begin end.
Тема урока:
Повторим нужные конструкции алгоритмов Задача. Ввести два целых числа и вывести на экран наибольшее из них. Ход решения: выводим на экран первое число, если оно больше второго, или второе, если оно больше первого. При этом: действия исполнителя зависят от некоторого условия (если …то… иначе …всё). Алгоритмы, в которых последовательность шагов зависит от выполнения некоторых условий, называются разветвляющимися. Операторы языков программирования, с помощью которых записывают алгоритмы с нарушенной последовательностью выполнения команд, называют операторами управления. Алгоритмы, в которых последовательность шагов зависит от выполнения некоторых условий, называются разветвляющимися. Операторы языков программирования, с помощью которых записывают алгоритмы с нарушенной последовательностью выполнения команд, называют операторами управления.
Блок-схема решения задачи начало max:= a; ввод a,b вывод max a > b? max:= b; конец да нет полная форма ветвления блок "решение"
Структурограмма решения задачи ввод a,b a > b? да-нет max:= a; max:= b вывод max Запись решения задачи на школьном алгоритмическом языке (ШАЯ) алг БИД арг вещ а, b рез вещ max нач ввод a, b; если a>b то max:=a иначе max:=b; все вывод max кон блок "решение" полная форма ветвления блок "решение" полная форма ветвления
Условный оператор if then begin {что делать, если условие выполнено (верно) } end else begin {что делать, если условие не выполнено (ложно) } end; Запомните!!! если в блоке один оператор, то можно не писать слова begin и end после then и else ; перед else не ставится точка с запятой; вторая часть ( else …) может отсутствовать (неполная форма);
if then begin {что делать, если условие верно} end else begin {что делать, если условие ложно} end; начало max:= a; ввод a,b вывод max a > b? max:= b; конец да нет if a > b then begin max:= a; end else begin max:= b; end;
Программа решения задачи program Primer; var a, b, max: integer; begin writeln('Введите два целых числа'); read ( a, b ); if a > b then begin max := a; end else begin max := b; end; writeln ('Наибольшее число ', max); end. полная форма условного оператора
program Primer; var a, b, max: integer; begin writeln('Введите два целых числа'); readln ( a, b ); if a > b then begin max:= a; end else begin max:= b; end; writeln ('Наибольшее число ', max); end. аbmaxa>bэкран -711
Найдите ошибки if a > b then begin a := b; end else b := a; end; if a > b then begin a := b; else begin b := a; end; 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; begin end begin end
Блок-схема неполная форма ветвления начало max:= a; ввод a,b вывод max max:= b; конец да нет b > a?
Программа program Primer; var a, b, max: integer; begin writeln('Введите два целых числа'); read (); max := a; if b > a then max := b; writeln ('Наибольшее число ', max); end. неполная форма условного оператора Что будет выведено, если a будет равно b?
Найдите ошибки if a > b then begin a := b; else b := a; if a > b then begin a := b; end; else b := a; if a > b then else begin b := a; end; if a > b then a := b; else b := a; end; a := b end a := b if b >= a then b := a;
Составить алгоритм и программу поиска меньшего из двух чисел (форму записи алгоритма выбрать по своему усмотрению) Домашнее задание: Составить алгоритм и программу поиска меньшего из двух чисел (форму записи алгоритма выбрать по своему усмотрению)