Линейный алгоритм в среде программирования Lazarus

Повторение пройденного материала Как называется оператор, выделенный красным цветом? x:=a+b;

Повторение пройденного материала Правильно ли записано выражение? var x:integer; begin x:=2.5; end;

Повторение пройденного материала Какой из фрагментов программы неправильный? Почему? var x:real; y:integer; begin x:=3.5; y:=x; end; var x:real; y:integer; begin y:=5; x:=y; end; 12

Повторение пройденного материала Чему равны значения переменных r,a,d? var a,b,c:integer; r,d:real; begin a:=5; b:=20; c:=-7; d:=2.5; r:=a+(4*b+c)*d; a:=a+4; d:=a*7; end;

Повторение пройденного материала Какие объекты среды программирования Lazarus присутствуют на рисунке?

Повторение пройденного материала

Поясните значения функций StrToInt IntToStr StrToFloat FloatToStr

Повторение пройденного материала Определите результат выполнения следующего фрагмента программы; a:=5; b:=7; Edit1.Text:=StrToInt(a+b);

Тест Выполняем тест

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

Этапы решения задач на компьютере 1) Постановка задачи. 2) Построение математической модели. 3) Алгоритмизация. 4) Составление сценария работы на компьютере. 5) Написание задачи на языке программирования. 6) Отладка и тестирование программы. 7) Анализ полученных результатов.

Задача «Покупка в магазине» Человек делает в магазине покупки. Определите, сколько денег у него останется, после покупки в магазине: перчаток стоимостью А руб., портфеля стоимостью B руб. и галстука стоимостью С руб. Все исходные данные задаются с клавиатуры.

1. Постановка задачи Перемен ная Смысловое значение тип a - стоимость перчаток Integer b - стоимость портфеля Integer d - стоимость галстука Integer money - количество денег у человека integer Результат: rem – количество денег, которое останется – integer. Исходные данные:

2. Метод решения (математическая модель) rem = money – a – b – c

3. Алгоритм решения ввод a,b,c,money rem:= money – a – b – c вывод rem начало конец

5. Программа var a,b,c,money,rem:integer; begin a:=StrToInt(edit1.Text); b:=StrToInt(edit2.Text); c:=StrToInt(edit3.Text); money:=StrToInt(edit5.Text); rem:=money-a-b-c; edit4.Text:=IntToStr(rem); end;

6. Тест Задаем значения: a = 500 b = 450 d = 320 money = 1700 Вычислим: rem = 1700 – 500 – 450 – 320 = 430

Что видим на экране

7. Анализ полученного результата Проверяем полученный на экране результат с нашим тестом. Если результат совпадает, то программа работает правильно. Если – нет, то надо искать ошибку.