Учебно-методические материалы для студентов кафедры АСОИУ

Учебные программы » Пакеты прикладных программ » Лабораторные работы

Программирование линейных и разветвляющихся алгоритмов

Лабораторная работа №2

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

Теоретические разделы для выполнения лабораторной работы

  1. Структура программы.
  2. Основные арифметические и математические операции и функции языка программирования.
  3. Структура логического оператора If

Задание к работе

Вычислить значение выражения с учетом области допустимых значений (по вариантам). Исходные данные задать самостоятельно.

  1. Программирование линейных вычислительных процессов
  2. Программирование разветвляющихся вычислительных процессов

Замечание

При выполнении лабораторной работы рекомендуется использовать метод разделения на части.

Пример

Вычислить выражение

Метод разделения на части состоит в следующем: исходное выражение разбиваем на элементарные части, например

а = sin(x)

b = x-2

c = cos(x)

После разбиения на части расчетная формула имеет следующий вид:

Область допустимых значений для этой функции:

b <> 0, c > 0

Текст программы с учетом ОДЗ:

Sub lr2_2()
	Dim x, y, a, b, c As Single

	x = Val(InputBox(“Введите значение х”))

	a = sin(x)
	b = x-2
	c = cos(x)

	If b<>0 Then
	 If c>0 Then
	 y=a/b-log(c)
	 MsgBox “Результат Y = ” & y,, “Вывод результатов”
	 Else
	 MsgBox “Подлогарифмическое выражение < = 0”, vbCritical, “Ошибка”
		End If
	Else
	 MsgBox “Знаменатель = 0” , vbCritical, “Ошибка”
	End If
End Sub

Контрольные вопросы

  1. Основные математические функции языка программирования, используемые в программе.
  2. Функция для ввода данных с клавиатуры.
  3. Функция для вывода результатов на экран.
  4. Структура оператора If.

Варианты заданий

Анатольев А.Г., 15.10.2012

Постоянный адрес этой страницы:

↑ В начало страницы