это быстро и бесплатно
Оформите заказ сейчас и получите скидку 100 руб.!
ID (номер) заказа
2281543
Ознакомительный фрагмент работы:
Лабораторная работа 1
Табулирование функций, нахождение максимума и минимума
Задание
Для функции (своего варианта) написать программу, которая табулирует функцию при значениях аргумента, изменяющихся на отрезке [Xn, Хк] с шагом dx, находит максимальное и минимальное значения функции на этом отрезке, и строит график.
Оформить отчёт о работе на бумаге формата А4.
Работа
Программа для табулирования указанной функции написана на VBA для Excel.
Блок-схема программы приведена на рисунке 1
Собственно программа условно состоит из трех частей: ввода исходных данных с проверкой допустимости ввода, собственно табулирования функции с расчетом максимального и минимального значения функции на введенном отрезке и вывода результатов.
Для проверки допустимости введенных данных была написана функция Function getDouble(st As String) As Double, входным параметром которой является текстовое значение ячейки таблицы Excel. Результатом работы функции является действительное число, соответствующее его текстовому написанию. Если исходный текст не является числом, то функция возвращает значение 0. Так как аргументом функции также может быть и строка «0», то в тексте программы предусмотрена дополнительная проверка на значение ячеек для ввода исходных данных.
Начало
Ввод Xn, Xk, dXXtek=XnXtek<=XkДа
Нет
Y(Xtek)=sin(Xtek)+abs(Xtek)+2^ XtekВывод Xtek, Y(Xtek)
Xtek = Xtek + dXXtek=XnДа
min = Y(Xtek)
max = Y(Xtek)
Вывод min,maxдиаграммы
Конец
Начало
Ввод Xn, Xk, dXXtek=XnXtek<=XkДа
Нет
Y(Xtek)=sin(Xtek)+abs(Xtek)+2^ XtekВывод Xtek, Y(Xtek)
Xtek = Xtek + dXXtek=XnДа
min = Y(Xtek)
max = Y(Xtek)
Вывод min,maxдиаграммы
Конец
Рисунок 1 Блок-схема программы
Ниже приведен текст функции getDoubleFunction getDouble(st As String) As Double
If InStr(1, st, ",") > 0 Then st = Replace(st, ",", ".")
zn = Val(st)
st1 = CStr(zn)
If InStr(1, st1, ",") > 0 Then st1 = Replace(st1, ",", ".")
If st <> st1 Then zn = 0
getDouble = znEnd Function
Сама программа проверяет допустимость исходных данных, если какие-то данные введены не верно, то выдается сообщение об ошибочном задании того или иного параметра. После чего очищает поле вывода результатов табулирования, табулирует функцию, одновременно вычисляя наибольшее и наименьшее значение функции и выводя результаты табулирования. По результатам табулирования строится точечная диаграмма.
Для работы программы необходимо ввести исходные значения в соответствующие ячейки и нажать кнопку «Рассчитать». Результаты работы программы представлены на рисунке 2.
Рисунок 1 Результаты работы программы
Ниже приведен текст программы.
Sub Кнопка1_Щелчок() Cells(3, 7).Value = ""
osh = ""
xn = getDouble(Cells(2, 7))
If xn = 0 And Cells(2, 7) <> "0" Then osh = osh + " начального х"
xk = getDouble(Cells(2, 8))
If xk = 0 And Cells(2, 8) <> "0" Then osh = osh + " конечного х"
dx = getDouble(Cells(2, 9))
If dx = 0 And Cells(2, 9) <> "0" ...
Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников 
Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.
Цены ниже, чем в агентствах и у конкурентов
Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит
Бесплатные доработки и консультации
Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки
Гарантируем возврат
Если работа вас не устроит – мы вернем 100% суммы заказа
Техподдержка 7 дней в неделю
Наши менеджеры всегда на связи и оперативно решат любую проблему
Строгий отбор экспертов
К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»
Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован 
Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн 
изменить 3 главу полностью и заключение на проблемы и решения которые...
Диплом, Уголовно-процессуальное право
Срок сдачи к 3 окт.
Написать реферат. Правовые механизмы природопользования и защиты окружающей среды. В-01862
Реферат, Право
Срок сдачи к 12 окт.
Правосубъектность военнослужащих войск национальной гвардии РФ
Курсовая, Правоведение
Срок сдачи к 16 окт.
Контрольная работа по Теоретической и прикладной механике
Контрольная, Теоретическая и прикладная механика
Срок сдачи к 6 окт.
7 вариант, две контрольные работы
Контрольная, Теоретические основы обеспечения устойчивости функционирования объектов экономики и территорий
Срок сдачи к 19 окт.
Необходимо подготовить работу по дисциплине «учебно-проектная деятельность — 2» на основе приложенных материалов упд-1 и методического пособия тусур
Лабораторная, Учебно-проектная деятельность (УПД-2)
Срок сдачи к 9 окт.
Страхование и договор страхования: проблемы правового регулирования
Курсовая, Гражданское право
Срок сдачи к 2 нояб.
Выполнить тесты по Технологическое предпринимательство. В-01861
Решение задач, Менеджмент
Срок сдачи к 9 окт.
Требуется написать качественный и понятный текст для карточки товара...
Другое, Русский язык
Срок сдачи к 8 окт.
«Всё сдал!» — безопасный онлайн-сервис с проверенными экспертами
Используя «Свежую базу РГСР», вы принимаете пользовательское соглашение
и политику обработки персональных данных
Сайт работает по московскому времени:
Принимаем к оплате
© 2011—2026 Всё сдал!
Заполните форму и узнайте цену на индивидуальную работу!
Мы ВКонтакте 
Трейлер о сайте