Студопедия — Алгоритмы разветвляющейся структуры
Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Алгоритмы разветвляющейся структуры






Разветвляющимся называется вычислительный процесс, реализация которого происходит по одной из нескольких заранее предусмотренных последовательностей действий (ветвей). Выбор ветви зависит от выполнения или невыполнения заданного условия. По одной из ветвей может не быть никаких действий. Это называется обходом.

Задача 2. Составить схему алгоритма вычисления значения y=(2x+3)/(3x-4).

На первый взгляд, алгоритм нахождения значения y кажется линейным, но это не так. В алгоритме необходимо проверить условие: равен ли нулю знаменатель при данном значении x. Если это условие выполняется, то идем по стрелке "да" и выводим сообщение о невозможности вычисления y. Если условие не выполняется, то переходим по стрелке "нет" к блоку, в котором вычисляется значение y.

Рис.2. Схема алгоритма решения задачи 2.

Приведем программы на Паскале и Бейсике для задачи 2.

Program Prim_2; {заголовок программы}

Var X, D: Integer; {блок описания данных}

Y: Real;

Begin {начало операторов программы}

Read(X); {ввод значения Х с клавиатуры }

WriteLn('X=',Х); {вывод Х на экран для контроля}

D:=(3*X-4); {нахождение знаменателя}

WriteLn('D=',D); {вывод D на экран для контроля}

If D=0 Then {если знаменатель=0, то делать}

Writeln('Найти Y нельзя') {вывод сообщения}

Else {иначе выполнить}

Begin {открытие блока}

Y:=(2*X+3)/D; {нахождение Y }

Writeln('Y=',Y:8:2) {вывод результата}

End {закрытие блока}

End. {конец программы}

 

Эта же задача может быть записана на Бейсике следующим образом:

10 Input X%

20 Print "X=";X%

30 D%=(3*X%-4)

40 If D%=0 Then Print "Нельзя найти Y" Else Y=(2*X%+3)/D%: Print Y

50 End

Целый тип в Бейсике может задаваться через имена переменных. Для этого используется знак %, который ставится в конце имени. Например, переменная X имеет вещественный тип, а переменная X% - целый тип.

 

Задача 3. Вычислить

x + a, если x < 3

y = x - a, если x > 3

x2 + a2, если x = 3

 

Имеются три формулы для вычисления y. Исходными данными в задаче являются переменные x и a. Выбор той или иной формулы зависит от заданных условий. Можно начать алгоритм с проверки любого условия из заданных. В разветвляющемся алгоритме должны получиться три ветви (каждая ветвь для соответствующей формулы). Это обеспечивается проверкой двух условий. Выполнение третьего условия следует автоматически из невыполнения двух других.

Предлагается следующая блок-схема решения этой задачи.

Рис.3. Схема алгоритма решения задачи 3.

Программа на Паскале представлена ниже.

Program Prim_3; {заголовок программы}

Var X: Integer; {блок описания данных}

Y, A: Real;

Begin {начало операторов программы}

Read(X); {ввод целого числа Х с клавиатуры}

WriteLn('X=',Х); {вывод Х на экран для контроля}

Read(A); {ввод вещественного числа A с клавиатуры}

WriteLn('A=',A:6:2); {вывод A на экран для контроля}

If X>3 Then {если X>3, то делать}

Y:=X-A

Else {иначе выполнить}

If X<3 Then Y:=X+A

Else Y:=X*X+Y*Y; {иначе выполнить}

 

Writeln('Y=',Y:8:2) {вывод результата}

End. {конец программы}

 

Решение этой задачи может быть записано на Бейсике следующим образом:

10 Input X%,A

20 Print ("X=";X%)

30 Print ("A=";A)

40 If X%>3 Then Y=X%-A: GOTO 60

50 If X%<3 Then Y=X%+A Else Y=X%*X%+A*A

60 Print ("Y=";Y)

70 End

Задача 4. Даны целые числа x, y, z. Вычислить u=min(x, max(y, z)).

В этой задаче сначала нужно найти наибольшее число из y и z. Найденное наибольшее число запоминается в переменной r. Затем находится наименьшее число из x и r.

Рис.4. Схема алгоритма решения задачи 4.

Приведем соответствующие программы.

Program Prim_4; {заголовок программы}

Var X, Y, Z,R,U: Integer; {блок описания данных}

{Все переменные в программе целого типа}

Begin {начало операторов программы}

WriteLn('Введите три целых числа X, Y, Z ’);

Read(X,Y,Z); {ввод значения Х с клавиатуры}

WriteLn('X=',Х,’Y=’,Y,’Z=’,Z); {вывод Х на экран для контроля}

If Y>Z Then {если Y>Z, то делать}

R:=Y

Else {иначе выполнить}

R:=Z;

If X<R Then

U:=X

Else

U:=R;

Writeln('U=',U:6) {вывод результата}

End. {конец программы}

 

Алгоритм на Бейсике выглядит так:

10 Input X%,Y%,Z%

20 Print ("X=";X%)

30 Print ("Y=";Y%)

40 Print ("Y=";Y%)

50 If Y%>Z% Then R%=Y% Else R%=Z%

60 If X%<R% Then U%=X% Else U%=R%

60 Print ("U=";U%)

70 End

 







Дата добавления: 2015-10-15; просмотров: 641. Нарушение авторских прав; Мы поможем в написании вашей работы!



Обзор компонентов Multisim Компоненты – это основа любой схемы, это все элементы, из которых она состоит. Multisim оперирует с двумя категориями...

Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...

Важнейшие способы обработки и анализа рядов динамики Не во всех случаях эмпирические данные рядов динамики позволяют определить тенденцию изменения явления во времени...

ТЕОРЕТИЧЕСКАЯ МЕХАНИКА Статика является частью теоретической механики, изучающей условия, при ко­торых тело находится под действием заданной системы сил...

Ученые, внесшие большой вклад в развитие науки биологии Краткая история развития биологии. Чарльз Дарвин (1809 -1882)- основной труд « О происхождении видов путем естественного отбора или Сохранение благоприятствующих пород в борьбе за жизнь»...

Этапы трансляции и их характеристика Трансляция (от лат. translatio — перевод) — процесс синтеза белка из аминокислот на матрице информационной (матричной) РНК (иРНК...

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

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

Классификация и основные элементы конструкций теплового оборудования Многообразие способов тепловой обработки продуктов предопределяет широкую номенклатуру тепловых аппаратов...

Именные части речи, их общие и отличительные признаки Именные части речи в русском языке — это имя существительное, имя прилагательное, имя числительное, местоимение...

Studopedia.info - Студопедия - 2014-2024 год . (0.011 сек.) русская версия | украинская версия