03.02.2015г. Составление линейного алгоритма на языке ABC Pascal.
Задание : составьте алгоритм посадки дерева. Выкопать в земле ямку; Опустить в ямку саженец; Засыпать ямку с саженцем землей; Полить саженец водой. начало конец Выкопать яму Опустить в ямку саженец Засыпать ямку с саженцем землей Полить саженец водой
Линейный Алгоритм Алгоритм, в котором команды выполняются последовательно одна за другой, называется линейным алгоритмом (Пример: Алгоритм посадки дерева.)
Базовая структура линейного алгоритма начало конец Команда 1 Команда 2 Команда n
Этапы решения задач на компьютере: Постановка задачи . Построение математической модели. Алгоритмизация. Написание задачи на языке программирования. Отладка и тестирование программы. Анализ полученных результатов.
Задача Вычислить периметр произвольного треугольника по его трем сторонам. а b c
Решение 1.Постановка задачи Исходные данные Результат Переменная Смысловое значение Тип значения a Сторонытреугольника вещественный b вещественный c вещественный P Периметр треугольник вещественный
Решение 2.Построение математической модели: P=a+b+c 3.Алгоритм решения: начало Конец. P=a+b+c Вывод: P Ввод : a,b,c
Решение 4.Программа: Program zad_1; Uses crt; Var a,b,c:integer; Begin Clrscr; Write(‘Введите значение сторон треугольника’); Readln(a,b,c); P:=a+b+c; Write(‘Периметр треугольника P=‘, P); Readln; End.
5.Тест. Задаем значения a=3 b=5 c=8 P=3+5+8=16
Что происходит после запуска программы? Введите через запятую значение сторон треугольника 3,5,8 После этого в переменные заносятся введенные значения a = 3 b = 5 d = 8 Выполняется оператор присваивания P=a+b+c В переменную P заносится значение 16 (P=16) Выносится результат на экран Периметр треугольника P=16
Вопросы Что значит линейный алгоритм? Какие этапы решения алгоритмов на компьютере мы узнали?
Домашнее задание 1.Выучить записи в тетради. 2.Задача: Вычислить периметр произвольного прямоугольника по двум его сторонам.(Запись в тетради болк-схемы и алгоритм программы на языке ABC Pascal)
Спасибо за урок! До свидания, желаю вам успехов!