Образцы решения типовых задач

Лабораторная работа №5.

Тема: Составление программ разветвляющейся структуры. Обработчик исключений.

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

Оборудование и материалы: Методическое пособие, ручка, карандаш, линейка, ластик, шаблон А4.

Ход работы

Методические рекомендации.

Необходимая информация содержится в лекции № 3, № 10.

Решение задач представить в следующем порядке: постановка задачи, построение математической модели, блок-схемы процедур и функций, программный код, тестирование.

Задание для лабораторной работы выбрать согласно варианту по приведённой таблице. Вариант определяется порядковым номером в журнале группы.

Образцы решения типовых задач.

Пример 1. Разработать программу, которая вычисляет значение функции, заданной следующим образом:

у =

Программа должна начинаться с ввода значения аргумента. Затем в зависимости от того, в какой интервал попадает введенное значение, вычисляем значение функции по одному из заданных выражений.

Алгоритм решения данной задачи представлен в виде блок – схемы:

Текст программы имеет следующий вид. Program ex; Var x,y: real; Begin WriteLn( 'введите значение аргумента.' ); ReadLn(x); if abs(x)<=1 then y:=abs(x) {первый отрезок} else if (abs(x)>1) and (abs(x)<=2 ) then y:=sqr(x) {второй отрезок} else y:=4; {третий отрезок} WriteLn(‘ При х=’, х:8:5,‘у=’, у:8:5 ); End.

 

 

Пример 3 По заданному номеру месяца m вывести на печать название времени года.

Для решения данной задачи необходимо проверить выполнение четырех условий. Если заданное число m равно 12, 1 или 2, то это зима, если m попадает в диапазон от 3 до 5, то – весна. Лето определяется принадлежностью числа m диапазону от 6 до 8, и соответственно, при равенстве переменной m 9,10 или 11 – это осень. Понятно, что область возможных значений переменной m находится в диапазоне от 1 до 12.

 

Var m: byte;

Begin

write (введите номер месяца m=');

readln (m);

if (m>=1) and (m<=12) then { проверка области допустимых значений переменной m. }

case m of

{ в зависимости от значения m на печать }

{ выводится название времени года. }

12, 1, 2: writeln ('ЗИМА');

3.. 5: writeln ('ВЕСНА');

6.. 8: writeln ('ЛЕТО');

9.. 11: writeln ('ОСЕНЬ');

End

Else

writeln ('ОШИБКА ПРИ ВВОДЕ!!!'); { если значение переменной m выходит за пределы области

допустимых значений, то выдается сообщение об ошибке.}

 

End.