Как сделать квадратное уравнение в excel?

Функция КОРЕНЬ принадлежит к категории Математических функций в Excel и возвращает положительное значение квадратного корня из числа.

Пример 1. С помощью секундомера и небольшого предмета (например, камня), можно определить высоту здания (отпустить камень в свободное падение и засечь на секундомере моменты между началом движения и соприкосновения с поверхностью земли). Однако, зная высоту, можно рассчитать время, которое потребуется предмету на свободное падение. Для этого можно использовать следующую формулу: t=√(2H/g).

Как сделать квадратное уравнение в excel?

Где:

  • t – искомая величина времени падения;
  • H – высота, с которой предмет запущен в свободное падения;
  • g – ускорение свободного падения (пример равным 9,81).

Рассчитаем, сколько будет падать предмет с высоты 200 м (сопротивлением воздуха пренебрежем).

Внесем исходные данные в таблицу:

Как сделать квадратное уравнение в excel?

Для расчета используем следующую формулу:

=КОРЕНЬ(2*B2/B3)

Как сделать квадратное уравнение в excel?

В качестве параметра функция принимает выражение 2*B2/B3, где:

  • B2 – ячейка с данными о высоте, с которой запущен предмет;
  • B3 – ячейка, содержащая данные об ускорении свободного падения.

В результате получим:

Как сделать квадратное уравнение в excel?

То есть, время падения составит примерно 6,4 с.



Пример 2. Функцию КОРЕНЬ удобно использовать для построения графика следующего типа:

Как сделать квадратное уравнение в excel?

Рассмотрим на примере, как построить график данной функции в Excel.

Заполним таблицу данных:

Как сделать квадратное уравнение в excel?

Для расчета значения функции y используем следующую формулу:

=КОРЕНЬ(A3)

A3 – соответствующее значение аргумента x. Аналогичным способом рассчитаем значение функции y в ячейке B4, а затем заполним таблицу следующим способом: выделим ячейки B3 и B4, поместим курсор мыши в правый нижний угол области выделения до появления знака «+».

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

Как сделать квадратное уравнение в excel?

Так Excel по аналогии произведет расчет остальных значений функции с использованием функции КОРЕНЬ, принимающей аргументы из соответствующих ячеек.

В меню Вставка находим график с маркерами и вставляем его на лист Excel. В качестве данных для осей указываем значения аргументов x и функции y:

Как сделать квадратное уравнение в excel?

Как найти квадратный корень из дискриминанта в Excel?

Пример 3. Для решения квадратных уравнений зачастую используют метод нахождения дискриминанта числа. Для нахождения квадратного корня из дискриминанта будет использована функция КОРЕНЬ. Создадим форму для расчета значений x1 и x2 (корней уравнения).

Для примера найдем корни уравнения 2×2+3x+c=0.

Таблица имеет следующий вид:

Как сделать квадратное уравнение в excel?

Рассмотрим формулу, введенную в ячейку B5:

Как сделать квадратное уравнение в excel?

С помощью формулы ЕСЛИ выполняется проверка наличия данных в ячейках A3, B3 и C3, которые содержат значения коэффициентов a, b и с. Если они пустые, в ячейке B5 отобразится текстовая строка «Значения не введены».

Если A3 содержит значение, не равное нулю, производится расчет дискриминанта по известной формуле.

Иначе будет выведена текстовая строка «NaN», то есть, уравнение не является квадратным, вычислить значение дискриминанта невозможно.

Ячейка B6 содержит следующую формулу:

Формула ЕСЛИ выполняет проверку условия ввода данных (если не введены, будет выведено значение 0). Следующая функция ЕСЛИ проверяет ячейку B5 на наличие значения «NaN».

Если содержится «NaN», мы имеем дело с обычным линейным уравнением типа bx+c=0, единственный корень которого будет отображен в ячейке B6. Далее выполняется проверка дискриминанта на принадлежность к диапазону отрицательных чисел.

Если дискриминант больше или равен нулю, производится расчет первого корня уравнения по известной формуле, иначе будет выведена текстовая строка «Решений нет».

Формула в ячейке B7 имеет лишь 2 отличия:

Во избежание дублирования результата в случае единственного решения уравнения, будет отображен текст «Единственный корень отображен выше». Также изменена формула расчета второго корня уравнения.

То есть, данное уравнение имеет два корня: -0,5 и -1.

Функция КОРЕНЬ в Excel и особенности ее синтаксической записи

Данная функция используется наряду с прочими математическими функциями Excel, такими как ЗНАК, КОРЕНЬПИ, ДВФАКТР и другими. Она имеет следующий синтаксис:

=КОРЕНЬ(число)

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

Примечания:

  1. В качестве параметра может быть передана ссылка на ячейку, содержащую числовые данные, либо указано определенное значение непосредственно в записи функции (например, КОРЕНЬ(A2) или КОРЕНЬ(144)).
  2. Если в качестве параметра функции КОРЕНЬ была передана ссылка на ячейку, не содержащую данных, результатом работы функции КОРЕНЬ будет 0 (нуль).
  3. Если в качестве параметра число были передано число из диапазона отрицательных чисел, функция КОРЕНЬ вернет код ошибки #ЧИСЛО!. При необходимости получения корня из отрицательного числа можно воспользоваться функцией ABS, которая возвращает модуль данного числа (абсолютное, то есть положительное значение). Например, результатом выполнения функции =КОРЕНЬ(ABS(-169)) будет число 13.
  4. Для расчета квадратного корня из числа можно использовать функцию =СТЕПЕНЬ(число;степень), где смысл параметра число эквивалентен смыслу одноименного параметра функции КОРЕНЬ, а в качестве параметра степень необходимо ввести число 0,5 (с точки зрения математики, корень квадратный из числа соответствует возведению данного числа в степень ½ или 0,5 в десятичной записи дроби).
  5. Также в Excel можно использовать математический символ «^» (Shift+6). Это означает, что еще одним эквивалентом записи «=КОРЕНЬ(A1)» является «=A1^0,5».

Источник: https://exceltable.com/funkcii-excel/primery-funkcii-koren

Решение системы уравнений в Microsoft Excel

Как сделать квадратное уравнение в excel?

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

Варианты решений

Любое уравнение может считаться решенным только тогда, когда будут отысканы его корни. В программе Excel существует несколько вариантов поиска корней. Давайте рассмотрим каждый из них.

Способ 1: матричный метод

Самый распространенный способ решения системы линейных уравнений инструментами Excel – это применение матричного метода. Он заключается в построении матрицы из коэффициентов выражений, а затем в создании обратной матрицы. Попробуем использовать данный метод для решения следующей системы уравнений:

14×1+2×2+8×4=218
7×1-3×2+5×3+12×4=213
5×1+x2-2×3+4×4=83
6×1+2×2+x3-3×4=21

  1. Заполняем матрицу числами, которые являются коэффициентами уравнения. Данные числа должны располагаться последовательно по порядку с учетом расположения каждого корня, которому они соответствуют. Если в каком-то выражении один из корней отсутствует, то в этом случае коэффициент считается равным нулю. Если коэффициент не обозначен в уравнении, но соответствующий корень имеется, то считается, что коэффициент равен 1. Обозначаем полученную таблицу, как вектор A.
  2. Как сделать квадратное уравнение в excel?

  3. Отдельно записываем значения после знака «равно». Обозначаем их общим наименованием, как вектор B.
  4. Как сделать квадратное уравнение в excel?

  5. Теперь для нахождения корней уравнения, прежде всего, нам нужно отыскать матрицу, обратную существующей. К счастью, в Эксель имеется специальный оператор, который предназначен для решения данной задачи. Называется он МОБР. Он имеет довольно простой синтаксис:

    =МОБР(массив)

    Аргумент «Массив» — это, собственно, адрес исходной таблицы.

    Итак, выделяем на листе область пустых ячеек, которая по размеру равна диапазону исходной матрицы. Щелкаем по кнопке «Вставить функцию», расположенную около строки формул.

  6. Как сделать квадратное уравнение в excel?

  7. Выполняется запуск Мастера функций. Переходим в категорию «Математические». В представившемся списке ищем наименование «МОБР». После того, как оно отыскано, выделяем его и жмем на кнопку «OK».
  8. Как сделать квадратное уравнение в excel?

  9. Запускается окно аргументов функции МОБР. Оно по числу аргументов имеет всего одно поле – «Массив». Тут нужно указать адрес нашей таблицы. Для этих целей устанавливаем курсор в это поле. Затем зажимаем левую кнопку мыши и выделяем область на листе, в которой находится матрица. Как видим, данные о координатах размещения автоматически заносятся в поле окна. После того, как эта задача выполнена, наиболее очевидным было бы нажать на кнопку «OK», но не стоит торопиться. Дело в том, что нажатие на эту кнопку является равнозначным применению команды Enter. Но при работе с массивами после завершения ввода формулы следует не кликать по кнопке Enter, а произвести набор сочетания клавиш Ctrl+Shift+Enter. Выполняем эту операцию.
  10. Как сделать квадратное уравнение в excel?

  11. Итак, после этого программа производит вычисления и на выходе в предварительно выделенной области мы имеем матрицу, обратную данной.
  12. Как сделать квадратное уравнение в excel?

  13. Теперь нам нужно будет умножить обратную матрицу на матрицу B, которая состоит из одного столбца значений, расположенных после знака «равно» в выражениях. Для умножения таблиц в Экселе также имеется отдельная функция, которая называется МУМНОЖ. Данный оператор имеет следующий синтаксис:

    =МУМНОЖ(Массив1;Массив2)

    Выделяем диапазон, в нашем случае состоящий из четырех ячеек. Далее опять запускаем Мастер функций, нажав значок «Вставить функцию».

  14. Как сделать квадратное уравнение в excel?

  15. В категории «Математические», запустившегося Мастера функций, выделяем наименование «МУМНОЖ» и жмем на кнопку «OK».
  16. Как сделать квадратное уравнение в excel?

  17. Активируется окно аргументов функции МУМНОЖ. В поле «Массив1» заносим координаты нашей обратной матрицы. Для этого, как и в прошлый раз, устанавливаем курсор в поле и с зажатой левой кнопкой мыши выделяем курсором соответствующую таблицу. Аналогичное действие проводим для внесения координат в поле «Массив2», только на этот раз выделяем значения колонки B. После того, как вышеуказанные действия проведены, опять не спешим жать на кнопку «OK» или клавишу Enter, а набираем комбинацию клавиш Ctrl+Shift+Enter.
  18. Как сделать квадратное уравнение в excel?

  19. После данного действия в предварительно выделенной ячейке отобразятся корни уравнения: X1, X2, X3 и X4. Они будут расположены последовательно. Таким образом, можно сказать, что мы решили данную систему. Для того, чтобы проверить правильность решения достаточно подставить в исходную систему выражений данные ответы вместо соответствующих корней. Если равенство будет соблюдено, то это означает, что представленная система уравнений решена верно.

Урок: Обратная матрица в Excel

Способ 2: подбор параметров

Второй известный способ решения системы уравнений в Экселе – это применение метода подбора параметров. Суть данного метода заключается в поиске от обратного. То есть, основываясь на известном результате, мы производим поиск неизвестного аргумента. Давайте для примера используем квадратное уравнение

3x^2+4x-132=0

  1. Принимаем значение x за равное 0. Высчитываем соответствующее для него значение f(x), применив следующую формулу:

    =3*x^2+4*x-132

    Вместо значения «X» подставляем адрес той ячейки, где расположено число 0, принятое нами за x.

  2. Переходим во вкладку «Данные». Жмем на кнопку «Анализ «что если»». Эта кнопка размещена на ленте в блоке инструментов «Работа с данными». Открывается выпадающий список. Выбираем в нем позицию «Подбор параметра…».
  3. Запускается окно подбора параметров. Как видим, оно состоит из трех полей. В поле «Установить в ячейке» указываем адрес ячейки, в которой находится формула f(x), рассчитанная нами чуть ранее. В поле «Значение» вводим число «0». В поле «Изменяя значения» указываем адрес ячейки, в которой расположено значение x, ранее принятое нами за 0. После выполнения данных действий жмем на кнопку «OK».
  4. После этого Эксель произведет вычисление с помощью подбора параметра. Об этом сообщит появившееся информационное окно. В нем следует нажать на кнопку «OK».
  5. Результат вычисления корня уравнения будет находиться в той ячейке, которую мы назначили в поле «Изменяя значения». В нашем случае, как видим, x будет равен 6.
  • Этот результат также можно проверить, подставив данное значение в решаемое выражение вместо значения x.
  • Урок: Подбор параметра в Excel
Читайте также:  Как сделать фигуры в word?

Способ 3: метод Крамера

Теперь попробуем решить систему уравнений методом Крамера. Для примера возьмем все ту же систему, которую использовали в Способе 1:

14×1+2×2+8×4=218
7×1-3×2+5×3+12×4=213
5×1+x2-2×3+4×4=83
6×1+2×2+x3-3×4=21

  1. Как и в первом способе, составляем матрицу A из коэффициентов уравнений и таблицу B из значений, которые стоят после знака «равно».
  2. Далее делаем ещё четыре таблицы. Каждая из них является копией матрицы A, только у этих копий поочередно один столбец заменен на таблицу B. У первой таблицы – это первый столбец, у второй таблицы – второй и т.д.
  3. Теперь нам нужно высчитать определители для всех этих таблиц. Система уравнений будет иметь решения только в том случае, если все определители будут иметь значение, отличное от нуля. Для расчета этого значения в Экселе опять имеется отдельная функция – МОПРЕД. Синтаксис данного оператора следующий:

    =МОПРЕД(массив)

    Таким образом, как и у функции МОБР, единственным аргументом выступает ссылка на обрабатываемую таблицу.

    Итак, выделяем ячейку, в которой будет выводиться определитель первой матрицы. Затем жмем на знакомую по предыдущим способам кнопку «Вставить функцию».

  4. Активируется окно Мастера функций. Переходим в категорию «Математические» и среди списка операторов выделяем там наименование «МОПРЕД». После этого жмем на кнопку «OK».
  5. Запускается окно аргументов функции МОПРЕД. Как видим, оно имеет только одно поле – «Массив». В это поле вписываем адрес первой преобразованной матрицы. Для этого устанавливаем курсор в поле, а затем выделяем матричный диапазон. После этого жмем на кнопку «OK». Данная функция выводит результат в одну ячейку, а не массивом, поэтому для получения расчета не нужно прибегать к нажатию комбинации клавиш Ctrl+Shift+Enter.
  6. Функция производит подсчет результата и выводит его в заранее выделенную ячейку. Как видим, в нашем случае определитель равен -740, то есть, не является равным нулю, что нам подходит.
  7. Аналогичным образом производим подсчет определителей для остальных трех таблиц.
  8. На завершающем этапе производим подсчет определителя первичной матрицы. Процедура происходит все по тому же алгоритму. Как видим, определитель первичной таблицы тоже отличный от нуля, а значит, матрица считается невырожденной, то есть, система уравнений имеет решения.
  9. Теперь пора найти корни уравнения. Корень уравнения будет равен отношению определителя соответствующей преобразованной матрицы на определитель первичной таблицы. Таким образом, разделив поочередно все четыре определителя преобразованных матриц на число -148, которое является определителем первоначальной таблицы, мы получим четыре корня. Как видим, они равны значениям 5, 14, 8 и 15. Таким образом, они в точности совпадают с корнями, которые мы нашли, используя обратную матрицу в способе 1, что подтверждает правильность решения системы уравнений.

Способ 4: метод Гаусса

Решить систему уравнений можно также, применив метод Гаусса. Для примера возьмем более простую систему уравнений из трех неизвестных:

14×1+2×2+8×3=110
7×1-3×2+5×3=32
5×1+x2-2×3=17

  1. Опять последовательно записываем коэффициенты в таблицу A, а свободные члены, расположенные после знака «равно» — в таблицу B. Но на этот раз сблизим обе таблицы, так как это понадобится нам для работы в дальнейшем. Важным условием является то, чтобы в первой ячейке матрицы A значение было отличным от нуля. В обратном случае следует переставить строки местами.
  2. Копируем первую строку двух соединенных матриц в строчку ниже (для наглядности можно пропустить одну строку). В первую ячейку, которая расположена в строке ещё ниже предыдущей, вводим следующую формулу:

    =B8:E8-$B$7:$E$7*(B8/$B$7)

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

    После того, как формула введена, выделите весь ряд ячеек и нажмите комбинацию клавиш Ctrl+Shift+Enter. К ряду будет применена формула массива и он будет заполнен значениями. Таким образом мы произвели вычитание из второй строки первой, умноженной на отношение первых коэффициентов двух первых выражений системы.

  3. После этого копируем полученную строку и вставляем её в строчку ниже.
  4. Выделяем две первые строки после пропущенной строчки. Жмем на кнопку «Копировать», которая расположена на ленте во вкладке «Главная».
  5. Пропускаем строку после последней записи на листе. Выделяем первую ячейку в следующей строке. Кликаем правой кнопкой мыши. В открывшемся контекстном меню наводим курсор на пункт «Специальная вставка». В запустившемся дополнительном списке выбираем позицию «Значения».
  6. В следующую строку вводим формулу массива. В ней производится вычитание из третьей строки предыдущей группы данных второй строки, умноженной на отношение второго коэффициента третьей и второй строки. В нашем случае формула будет иметь следующий вид:

    =B13:E13-$B$12:$E$12*(C13/$C$12)

    После ввода формулы выделяем весь ряд и применяем сочетание клавиш Ctrl+Shift+Enter.

  7. Теперь следует выполнить обратную прогонку по методу Гаусса. Пропускаем три строки от последней записи. В четвертой строке вводим формулу массива:

    =B17:E17/D17

    Таким образом, мы делим последнюю рассчитанную нами строку на её же третий коэффициент. После того, как набрали формулу, выделяем всю строчку и жмем сочетание клавиш Ctrl+Shift+Enter.

  8. Поднимаемся на строку вверх и вводим в неё следующую формулу массива:

    =(B16:E16-B21:E21*D16)/C16

    Жмем привычное уже нам сочетание клавиш для применения формулы массива.

  9. Поднимаемся ещё на одну строку выше. В неё вводим формулу массива следующего вида:

    =(B15:E15-B20:E20*C15-B21:E21*D15)/B15

    Опять выделяем всю строку и применяем сочетание клавиш Ctrl+Shift+Enter.

  10. Теперь смотрим на числа, которые получились в последнем столбце последнего блока строк, рассчитанного нами ранее. Именно эти числа (4, 7 и 5) будут являться корнями данной системы уравнений. Проверить это можно, подставив их вместо значений X1, X2 и X3 в выражения.

Как видим, в Экселе систему уравнений можно решить целым рядом способов, каждый из которых имеет собственные преимущества и недостатки.

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

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

Мы рады, что смогли помочь Вам в решении проблемы.

Опишите, что у вас не получилось.
Наши специалисты постараются ответить максимально быстро.

Помогла ли вам эта статья?

ДА НЕТ

Еще статьи по данной теме:

Источник: https://lumpics.ru/how-solve-system-equations-excel/

Квадратное уравнение в Excel

В этой статье вы узнаете как решить квадратное уравнение в Excel на конкретном примере. Подробно разберем решение несложно задачи с картинками.

Ход решения

Как сделать квадратное уравнение в excel?

Запустим программу Microsoft Office Excel. Я пользуюсь 2007 версией.  Для начала объединим ячейки A1:A5 и запишем в них формулу квадратного уравнения в виде ax2+bx+c=0.Далее нам нужно возвести x в квадрат, для этого нужно сделать цифру 2 надстрочным интервалом. Выделим двойку и нажмем правой кнопкой мыши.

Как сделать квадратное уравнение в excel?Как сделать квадратное уравнение в excel?

Получим формулу вида ax2 +bx+c=0

В ячейке A2 введем текстовое значение a= , в ячейке A3 b= и в ячейке A4 с= соответственно. Эти значения будут вводиться с клавиатуры в следующих ячейках (B2,B3,B4).

Введем текст для значений, которые будут считаться. В ячейке C2 d=, C3 x1= C4 x2=. Подстрочный интервал для xсделаем аналогично надстрочному интервалу в x2

Перейдем к вводу формул для решения

Дискриминант квадратного трехчлена равен b2-4ac

В ячейку D2 введем соответствующую формулу для возведения числа во вторую степень:

=B3^2-4*B2*B4

Как сделать квадратное уравнение в excel?

Квадратное уравнение имеет два корня, в случае если дискриминант больше нуля. В ячейку C3 введем формулу для x1

=ЕСЛИ(D2>0;(-B3+КОРЕНЬ(D2))/(2*B2);»Корней нет»)

Для расчета x2 введем похожую формулу, но со знаком плюс

=ЕСЛИ(D2>0;(-B3-КОРЕНЬ(D2))/(2*B2);»Корней нет»)

Соответственно при введенных значениях a,b,c сначала считается дискриминант, если его значения меньше нуля выводится сообщение «Корней нет», иначе получаем значения x1 и x2.

Защита листа в Excel

Нам нужно защитить лист, на котором мы производили расчеты. Без защиты нужно оставить ячейки, в которые можно вводить значения a,b,c, то есть ячейки B2 B3 B4. Для этого выделим данный диапазон и зайдем в формат ячеек, перейдем во вкладку Рецензирования, Защитить лист и уберем флажок с позиции Защищаемая ячейка. Нажмем кнопку OK, подтвердив внесенные изменения.

Как сделать квадратное уравнение в excel?

Этот диапазон ячеек будет не защищен при защите листа. Выполним защиту листа, для этого перейдем на вкладку Рецензирование пункт Защита листа. Пароль наберем 1234. Нажмем OK.

Теперь мы сможем изменять значения ячеек B2,B3,B4. При попытке изменения других ячеек мы получим сообщение следующего содержания: «Ячейка или диаграмма защищена от изменений. А так же совет по снятию защиты.

Так же вас может заинтересовать материал как закрепить область в Экселе.

Источник: https://abuzov.ru/kvadratnoe-uravnenie-v-excel-reseno/

Решение квадратного уравнения в Excel

Для решения квадратного уравнения необходимо знать формулу и алгоритм нахождения квадратов уравнения

Шаг 1. Организация таблицы

На первом этапе мы организуем таблицу для ввода данных коэффициентов a,b и c.

  • a называют первым или старшим коэффициентом,
  • b называют вторым или коэффициентом при x,
  • c называют свободным членом.

Как сделать квадратное уравнение в excel?

Шаг 2. Проверка равенства Дискриминанта

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

Формула дискриминанта

D = b2 — 4ac

Вычисление корней уравнения второй степени происходит по формулам при условии величины Дискриминанта

Условие D > 0  D = 0 D < 0
Число действительных корней корней два корень один Нет решения
Формула X1,2=(- b ±√ (b2 — 4 * a * c)) / (2 * a) X1=X2=-b/(2*a)

Как сделать квадратное уравнение в excel?

Шаг 3. Вычисляем корни уравнения

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

Находим первый корень

Как сделать квадратное уравнение в excel?Находим второй корень. Формула будет отличаться только в одном знаке.

Как сделать квадратное уравнение в excel?

Итог: с помощью Excel можем создать единожды таблицу и формулы для решения квадратного уравнения (уравнения второй степени) и быстро их решать.

Источник: https://wpcalc.com/kvadratnoe-uravnenie-excel/

Решение квадратных уравнений в MS Excel

  • Администрация городского округа Химки Московской области
  • МУНИЦИПАЛЬНОЕ БЮДЖЕТНОЕ ОБЩЕОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ
  • СРЕДНЯЯ ОБЩЕОБРАЗОВАТЕЛЬНАЯ ШКОЛА № 20 г. ХИМКИ
Читайте также:  Как сделать кроссворд в excel с проверкой и оценкой?

ИНН 5047045510 КПП 504701001 141431, МО, г. Химки, мкрн. Подрезково, ул. Школьная, д. 2,

  1. тел/факс: 8(495)574-13-63, 574-08-80,Е-mail: himkimou20@mail.ru
  2. Открытый интегрированный урок:
  3. «Решение квадратных уравнений в MS Excel».
  4. Авторы:
  5. Учитель информатики
  6. Гуськов Владимир Вячеславович,
  7. Учитель математики
  8. Уварова Марина Константиновна
  9. ТЕМА УРОКА: «Решение квадратных уравнений в MSExcel»
  10. (интегрированный урок: математика, информатика)
  11. Цель урока математики
  • Обобщение и систематизация материала по данной теме;

Учебные задачи

  • Развитие навыков само и взаимоконтроля

Воспитательные задачи

  • Развитие навыков групповой и индивидуальной деятельности

Цель урока информатики

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

Учебные задачи

  • Повторить правило ввода формул в ячейку
  • Повторить типы адресации ячеек; научиться пользоваться мастером функций
  • Воспитательные задачи
  • Развитие навыков аккуратного исполнения алгоритма при работе с компьютером.
  • Ход урока.
  • Вступительное слово психолога. Определение эмоционального состояния учащихся вначале урока (ученик выбирает полоску любого цвета, из которых учитель составляет цветовую матрицу класса)
  • Организационный момент: с целью проверки домашней работы учащиеся сдают сообщения по теме «Квадратные уравнения»
  • Учитель математики:
  • Являясь современными, учениками, обладая запасом знаний, накопленных нашими предками, вам предстоит на этом уроке решать квадратные уравнения различными способами:
  1. Используя формулу корней квадратного уравнения;

  2. Учитывая четность второго коэффициента;

  3. Выделением квадрата двучлена;

  4. Графическим, построением графиков функций;

  5. С помощью компьютера.

  1. Повторение
  2. Квадратным уравнением называется уравнение вида ах2 + bх +с=а, где а, b и с – коэффициенты квадратного уравнения, причём а не равно нулю, х – переменная.
  3. Формула корней квадратного уравнения ах2 + bх + с=0, при а не равно нулю
  4. Как сделать квадратное уравнение в excel?
  5. D=b2 -4ac
  6. Наличие корней зависит от знака D
  7. D
  8. корней нет один корень или два равных два различных корня
  9. I. Устная работа с учащимися
  10. Согласны ли вы с утверждением, что если в квадратном уравнении ах2 + bх +с=0 числа а и с имеют разные знаки, то уравнение имеет корни?
  1. Корни какого из уравнений обладают свойством:

  • а) сумма корней равна 6, а произведение равно –16.
  • б) один из корней 6; х2 – 6х=0
  • в) корни равны х2 – 10х + 25=0
  • г) корней нет. х2 – 6х – 16=0
  • х2 – 2х + 24=0
  1. Даны квадратные уравнения (D>0)

х2 + 4х – 5=0; 2х2 – 5х +3 =0; х2 – 4х+3=0; — 7х2+ 13х – 6=0

Все они обладают одним и тем же свойством. Каким? Используя это свойство, решите уравнение: 2006х2 + 19х – 2025=0

  1. Найдите значение выражения а) (х+4)2 б) х2 – 16

  1. зная, что х2 + 8х + 16=0
  2. Проверка работ по карточкам
  3. *** Физкультминутка (для снятия физического и эмоционального напряжения).

II. Работа по карточкам.

  • Карточка 1 и 2
  • Квадратное уравнение
  • Найти D
  • D= >< 0 сравнить значения
  • Найти корни квадратного уравнения
  • 1
  • х2 – 10х + 25=0
  • 2
  • 5х2 – 8х +3=0
  • 3
  • х2 – 2х +24=0
  • Уравнение х + рх + ġ=0
  • х1
  • х2
  • 1
  • х2 – 6х – 16 = 0
  • — 2
  • 2
  • х2 – 2х – 24 = 0
  • 6
  • 3
  • х2 – 6х = 0
  • 0
  • х1 + х2 = ________
  • х1 * х2 = ________

III. До сих пор решали квадратные уравнения только аналитически. Теперь для проверки полученных результатов составим в электронных таблицах алгоритм решения квадратного уравнения.

  1. Ещё раз обратим внимание на общий вид уравнения:
  2. ax2 + bx + c = 0
  3. Для составления электронной таблицы необходимо определить имена переменных величин
  • значения которых являются входными данными
  • значения которых являются выходными данными
  • Вход: a, b, c
  • Выход: d, x1, x2
  • Для получения выходных данных воспользуемся формулами нахождения дискриминанта и корней квадратного уравнения:
  • вход преобразование выход
  • Как сделать квадратное уравнение в excel?
  • a, b, c

b^2-4*a*c

d

Как сделать квадратное уравнение в excel?

(-b+корень(d))/(2*a)

x1

  1. a, b, d
  2. a, b, d

(-b-корень(d))/(2*a)

x2

Известно, что существование корней квадратного уравнения зависит от знака дискриминанта. Следовательно, необходимо исследовать дискриминант, для этого воспользуемся встроенной логической функцией если.

  • Графическое представление функции:
  • Составим таблицу для решения уравнения (1): x2 — 10x + 25 = 0
  • Почему числитель и знаменатель заключены в скобки?
  • Верно, чтобы не был нарушен приоритет операций при вычислении.
  • Решим уравнение (1) при помощи уже составленной электронной таблицы.
  • Сложно составить электронную таблицу для решения квадратного уравнения?
  • Верно, необходимо дополнительное время для изучения новой информации.

Зачем же его тратить? Может быть достаточно научиться решать уравнения вручную?

  1. Для ответа на этот вопрос решите квадратное уравнение (2)
  2. 357,89 x2 + 823,17x – 121,23=0
  3. при помощи уже составленной таблицы.
  4. Что для этого необходимо сделать?
  5. Верно, ввести новые входные данные.
  6. Вам понадобилось для этого много времени, совершенно верно, несколько секунд.
  7. Решение уравнения (2):
  8. Сколько времени вам понадобится для решения этого уравнения вручную?
  9. — Гораздо больше.
  10. А если не пользоваться калькулятором?
  11. — Много.
  12. Таким образом, этот пример демонстрирует очень важное свойство алгоритма – массовость.

IV. Практическое задание.

  • Используя электронные таблицы, проверить решения квадратных уравнений, выполненных вручную.
  • При помощи компьютера учащиеся проверяют правильность заполнения таблиц, приходят к выводу, что используя информационные технологии можно очень быстро и качественно решить квадратные уравнения.
  • V. Итог урока

Учитель: Что нового для себя узнали на уроке? Что понравилось?

VI. Домашнее задание

Составьте формулы для решения линейного уравнения ах = b в электронных таблицах.

Источник: https://infourok.ru/reshenie-kvadratnih-uravneniy-v-ms-ecel-2466541.html

Решение уравнений средствами Excel

  • 1. Циклические ссылки
  • 2. Подбор параметра
  • 3. Поиск решения
  • 1. Циклические ссылки

Если в ячейку Excel введена формула, содержащая ссылку на эту же самую ячейку (может быть и не напрямую, а опосредованно — через цепочку других ссылок), то говорят, что имеет место циклическая ссылка (цикл).

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

Excel не может провести вычисления, так как циклические ссылки порождают бесконечное количество вычислений. Есть два выхода из этой ситуации: устранить циклические ссылки или допустить вычисления по формулам с циклическими ссылками (в последнем случае число повторений цикла должно быть конечным).

Рассмотрим задачу нахождения корня уравнения методом Ньютона с использованием циклических ссылок. Возьмем для примера квадратное уравнение: х2 — 5х + 6=0, графическое представление которого приведено на рис. 8. Найти корень этого (и любого другого) уравнения можно, используя всего одну ячейку Excel.

Для включения режима циклических вычислений в меню Сервис/Параметры/вкладка Вычисления включаем флажок Итерации, при необходимости изменяем число повторений цикла в поле Предельное число итераций и точность вычислений в поле Относительная погрешность (по умолчанию их значения равны 100 и 0,0001 соответственно). Кроме этих установок выбираем вариант ведения вычислений: автоматически или вручную. При автоматическом вычислении Excel выдает сразу конечный результат, при вычислениях, производимых вручную, можно наблюдать результат каждой итерации.

Рис. 8. График функции

Выберем произвольную ячейку, присвоим ей новое имя, скажем — Х, и введем в нее рекуррентную формулу, задающую вычисления по методу Ньютона:

где F и F1 задают соответственно выражения для вычисления значений функции и ее производной. Для нашего квадратного уравнения после ввода формулы в ячейке появится значение 2, соответствующее одному из корней уравнения (рис. 8).

В нашем случае начальное приближение не задавалось, итерационный вычислительный процесс начинался со значения, по умолчанию хранимого в ячейке Х и равного нулю. А как получить второй корень? Обычно это можно сделать изменением начального приближения. Решать проблему задания начальных установок в каждом случае можно по-разному.

Мы продемонстрируем один прием, основанный на использовании функции ЕСЛИ. С целью повышения наглядности вычислений ячейкам были присвоены содержательные имена (рис. 9).

  1. В ячейку Хнач (В4) заносим начальное приближение — 5.
  2. В ячейку Хтекущ (С4) записываем формулу: =ЕСЛИ(Хтекущ=0;Хнач; Хтекущ-(Хтекущ^2-5*Хтекущ+6)/(2*Хтекущ-5)).
  3. В ячейку D4 помещаем формулу, задающую вычисление значения функции в точке Хтекущ, что позволит следить за процессом решения.
  4. Заметьте, что на первом шаге вычислений в ячейку Хтекущ будет помещено начальное значение, а затем уже начнется счет по формуле на последующих шагах.
  5. Чтобы сменить начальное приближение, недостаточно изменить содержимое ячейки Хнач и запустить процесс вычислений. В этом случае вычисления будут продолжены, начиная с последнего вычисленного
Рис. 9. Определение начальных установок

значения. Чтобы обнулить значение, хранящееся в ячейке Хтекущ, нужно заново записать туда формулу. Для этого достаточно для редактирования выбрать ячейку, содержащую формулу, дважды щелкнув мышью на ней (при этом содержимое ячейки отобразится в строке формул). Щелчок по кнопке (нажатие клавиши) Enter запустит вычисления с новым начальным приближением.

2.2. Подбор параметра

Когда желаемый результат вычислений по формуле известен, но неизвестны значения, необходимые для получения этого результата, можно воспользоваться средством Подбор параметра, выбрав команду Подбор параметра в меню Сервис. При подборе параметра Excel изменяет значение в одной конкретной ячейке до тех пор, пока вычисления по формуле, ссылающейся на эту ячейку, не дадут нужного результата.

Возьмем в качестве примера все то же квадратное уравнение х2-5х+6=0. Для нахождения корней уравнения выполним следующие действия:

В ячейку С3 (рис. 10) введем формулу для вычисления значения функции,

Рис. 10. Окно диалога Подбор параметра

стоящей в уравнении слева от знака равенства. В качестве аргумента используем ссылку на ячейку С2, т.е. =С2^2-5*C2+6.

В окне диалога Подбор параметра (рис. 10) в поле Установить в ячейке введем ссылку на ячейку с формулой, в поле Значение — ожидаемый результат, в поле Изменяя значения ячейки — ссылку на ячейку, в которой будет храниться значение подбираемого параметра (содержимое этой ячейки не может быть формулой).

После нажатия на кнопку Ok Excel выведет окно диалога Результат подбора параметра. Если подобранное значение необходимо сохранить, то нажмите на Оk, и результат будет сохранен в ячейке, заданной ранее в поле Изменяя значения ячейки. Для восстановления значения, которое было в ячейке С2 до использования команды Подбор параметра, нажмите кнопку Отмена.

При подборе параметра Excel использует итерационный (циклический) процесс. Количество итераций и точность устанавливаются в меню Сервис/Параметры/вкладка Вычисления.

Если Excel выполняет сложную задачу подбора параметра, можно нажать кнопку Пауза в окне диалога Результат подбора параметра и прервать вычисление, а затем нажать кнопку Шаг, чтобы выполнить очередную итерацию и просмотреть результат.

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

Читайте также:  Как сделать знак доллара в excel?

Вернемся к примеру. Опять возникает вопрос: как получить второй корень? Как и в предыдущем случае необходимо задать начальное приближение. Это можно сделать следующим образом (рис. 11,а):

а
б
Рис. 11. Поиск второго корня

В ячейку Х (С2) вводим начальное приближение.

В ячейку Хi (С3) вводим формулу для вычисления очередного приближения к корню, т.е. =X-(X^2-5*X+6)/(2*X-5).

В ячейку С4 поместим формулу, задающую вычисление значения функции, стоящей в левой части исходного уравнения, в точке Хi.

После этого выбираем команду Подбор параметра, где в качестве изменяемой ячейки принимаем ячейку С2. Результат вычислений изображен на рис. 11,б (в ячейке С2 — конечное значение, а в ячейке С3 — предыдущее).

Однако все это можно сделать и несколько проще. Для того чтобы найти второй корень, достаточно в качестве начального приближения (рис. 10) в ячейку C2 поместить константу 5 и после этого запустить процесс Подбор параметра.

2.3. Поиск решения

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

  • Задачи, которые можно решать с помощью Поиска решения, в общей постановке формулируются так:
  • Найти: х1, х2, … , хn такие, что: F(х1, х2, … , хn) > {Max; Min; = Value} при ограничениях:
  • G(х1, х2, … , хn) > {>Value; < Value; = Value}

Искомые переменные — ячейки рабочего листа Excel — называются регулируемыми ячейками. Целевая функция F(х1, х2, … , хn), называемая иногда просто целью, должна задаваться в виде формулы в ячейке рабочего листа.

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

Возможен выбор одного из вариантов:

  1. найти максимум целевой функции F(х1, х2, … , хn);
  2. найти минимум целевой функции F(х1, х2, … , хn);
  3. добиться того, чтобы целевая функция F(х1, х2, … , хn) имела фиксированное значение: F(х1, х2, … , хn) = a.

Функции G(х1, х2, … , хn) называются ограничениями. Их можно задать как в виде равенств, так и неравенств. На регулируемые ячейки можно наложить дополнительные ограничения: неотрицательности и/или целочисленности, тогда искомое решение ищется в области положительных и/или целых чисел.

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

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

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

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

Не нашли то, что искали? Воспользуйтесь поиском:

Источник: https://studopedia.ru/14_90323_voprosi.html

Пример простейших макросов

  • Простейшие макросы
  • Программирование в VBA ничем принципиально не отличается от большинства других языков программирования, если не использовать визуальные средства.
  • Язык программирования Бейсик, вернее, один из его диалектов или версий является частью VBA.
  • Когда вы программируете на VBA, то можете, также как и в Бейсик, вообще не описывать предварительно переменные, используемые в программе, чего Вы не можете сделать, например, в Паскале.

VBA – это разновидность VB для приложений.

VBA встроен в Application Word, Excel, Power Point, Access.

Для каждого приложения есть свои нюансы VBA.

С помощью VBA приложения можно связывать между собой, вызывая в одной программе разные приложения и передавая данные между ними.

Такой процесс называется Автоматизацией. То приложение, откуда данные берутся, выступает в роли сервера, а то приложение, куда данные вставляются, играет роль клиента.

  1. Лучше всего для сервера подходит Excel, а для клиента – Word.
  2. Переменные, описанные с помощью оператора Dim, являются локальными, и действуют лишь внутри объявляемого модуля.
  3. Переменные, объявленные как Public, действуют во всех программных модулях и доступны из любого модуля.

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

Если вы работаете в Excel, то есть одна тонкость при обработке вещественных (с десятичной точкой) чисел.

Чаще всего на листе Excel числа набираются через запятую, а VBA такие числа воспринимает через точку. Поэтому десятичные числа лучше с листа считывать в символьные переменные, а затем программным способом менять запятую на точку. Тогда ошибок не будет наверняка.

  • Если Вы  хотите, чтобы в VBA нельзя было использовать не объявленные переменные, как в Паскале, то надо перед программой поставить режим Explicit в виде команды Option Explicit.
  • Давайте рассмотрим простейшую программу по решению квадратных уравнений с использованием алгоритма, известного из школы.
  • Эту задачу средствами VBA в EXCEL можно решить минимум тремя или четырьмя способами.
  • Первый способ использует ввод и вывод данных на самом листе Excel.
  • Sub koren1()
  • Dim a As Integer
  • Dim b As Integer
  • Dim c As Integer
  • Dim d As Integer
  • Dim x1 As Integer
  • Dim x2 As Integer
  • ‘ Тип данных можно сделать Long для больших целых чисел
  • ‘ или Double для вещественных чисел
  • ‘ или Variant для чисел любого типа
  • ‘ Изменяя тип переменных, можно решать задачу в разных диапазонах данных
  • ‘ читаем значения чисел в переменные
  • i = 2 ‘Задаем номер строки
  • a = Cells(i, 1)
  • b = Cells(i, 2)
  • c = Cells(i, 3)
  • d = b * b – 4 * a * c ‘Вычисляем дискриминант
  • ‘Выводим его значение в строку 2, столбец 4
  • Cells(i, 4) = d
  • ‘Применяем условие для решения квадратных уравнений
  • If d >= 0 Then
  • MsgBox “Решение есть”
  • x1 = (-b – Sqr(d)) / (2 * a)
  • x2 = (-b + Sqr(d)) / (2 * a)
  • Cells(i, 5) = x1
  • Cells(i, 6) = x2
  • Else
  • MsgBox “Решений нет”
  • End If
  • End Sub
  • Решим задачу вторым способом, задавая сами значения непосредственно в программе.
  • Sub koren2()
  • Dim a As Integer
  • Dim b As Integer
  • Dim c As Integer
  • Dim d As Integer
  • Dim x1 As Integer
  • Dim x2 As Integer
  • ‘ Тип данных можно сделать Long для больших целых чисел
  • ‘ или Double для вещественных чисел
  • ‘ или Variant для чисел любого типа
  • ‘ Изменяя тип переменных, можно решать задачу в разных диапазонах данных
  • ‘ Заносим значения чисел в переменные
  • a = 1
  • b = 2
  • c = -35

MsgBox “Коэф. A=” + CStr(a) + vbCr + “Коэф. B=” + CStr(b) + vbCr + “Коэф. C=” + CStr(c)

d = b * b – 4 * a * c ‘Вычисляем дискриминант

‘Выводим его значение в строку 2, столбец 4

MsgBox “Коэф. A=” + CStr(a) + vbCr + “Коэф. B=” + CStr(b) + vbCr + “Коэф. C=” + CStr(c) + vbCr + _

  1. Дискриминант D=B*B-4*A*C= + CStr(d)
  2. ‘Обращаю внмание на вывод нестроковых значений в операторе Msgbox
  3. ‘ Значение надо преобразовать в строковый тип данных
  4. ‘Применяем условие для решения квадратных уравнений
  5. If d >= 0 Then
  6. MsgBox “Решение есть”
  7. x1 = (-b – Sqr(d)) / (2 * a)
  8. x2 = (-b + Sqr(d)) / (2 * a)
  9. MsgBox “Корень x1=” + CStr(x1) + vbCr + “Корень x2=” + CStr(x2)
  10. Else
  11. MsgBox “Решений нет”
  12. End If
  13. End Sub
  14. Решим задачу 3-м способом, получая значения путем их ввода в интерактивном режиме непосредственно в программу.
  15. Sub koren3()
  16. Dim a As Integer
  17. Dim b As Integer
  18. Dim c As Integer
  19. Dim d As Integer
  20. Dim x1 As Integer
  21. Dim x2 As Integer
  22. Dim a1 As String
  23. ‘ Тип данных можно сделать Long для больших целых чисел
  24. ‘ или Double для вещественных чисел
  25. ‘ или Variant для чисел любого типа
  26. ‘ Изменяя тип переменных, можно решать задачу в разных диапазонах данных
  27. ‘ Вводим значения в переменные
  28. a1 = InputBox(“Введите значение коэф.А”, “Ввод коэффициента”, 1)
  29. a = Val(a1)
  30. a1 = InputBox(“Введите значение коэф.B”, “Ввод коэффициента”, 2)
  31. b = Val(a1)
  32. a1 = InputBox(“Введите значение коэф.C”, “Ввод коэффициента”, -35)
  33. c = Val(a1)
  34. If a = 0 Then MsgBox “Уравнение имеет одно решение”

‘MsgBox “Коэф. A=” + CStr(a) + vbCr + “Коэф. B=” + CStr(b) + vbCr + “Коэф. C=” + CStr(c)

d = b * b – 4 * a * c ‘Вычисляем дискриминант

‘Выводим его значение в строку 2, столбец 4

MsgBox “Коэф. A=” + CStr(a) + vbCr + “Коэф. B=” + CStr(b) + vbCr + “Коэф. C=” + CStr(c) + vbCr + _

  • Дискриминант D=B*B-4*A*C= + CStr(d)
  • ‘Обращаю внмание на вывод нестроковых значений в операторе Msgbox
  • ‘ Значение надо преобразовать в строковый тип данных
  • ‘Применяем условие для решения квадратных уравнений
  • If d >= 0 Then
  • MsgBox “Решение есть”
  • x1 = (-b – Sqr(d)) / (2 * a)
  • x2 = (-b + Sqr(d)) / (2 * a)
  • MsgBox “Корень x1=” + CStr(x1) + vbCr + “Корень x2=” + CStr(x2)
  • Else
  • MsgBox “Решений нет”
  • End If
  • End Sub
  • Решим задачу 4-м способом, получая значения путем их ввода в форму пользователя непосредственно в программе.
  • Создаем форму  пользователя Userform1
  • В форме располагаем несколько меток и текстовых окон, а также две командные кнопки.
  • По каждой кнопке вызывается исполняемый модуль
  • Текстовые окна имеют имена Koef_A, Koef_B, Koef_C, Disk_D, Koren_x1 и Koren_x2
  • Командные кнопки имеют имена cmdRun и cmdExit.
  • Private Sub cmdExit_Click()
  • UserForm1.Hide
  • End Sub
  • Private Sub CmdRun_Click()
  • Dim a As Double
  • Dim b As Double
  • Dim c As Double
  • Dim d As Double
  • Dim x1 As Double
  • Dim x2 As Double
  • Dim a1 As Double
  • UserForm1.Disk_D = “”
  • UserForm1.Koren_x1 = “”
  • UserForm1.Koren_x2 = “”
  • ‘ Тип данных можно сделать Long для больших целых чисел
  • ‘ или Double для вещественных чисел
  • ‘ или Variant для чисел любого типа
  • ‘ Изменяя тип переменных, можно решать задачу в разных диапазонах данных
  • ‘ Вводим значения в переменные

If Trim(UserForm1.Koef_A) = “” Or Trim(UserForm1.Koef_B) = “” Or Trim(UserForm1.Koef_C) = “” Then

  1. MsgBox “Введите значения коэффициентов”
  2. Exit Sub
  3. End If
  4. a = UserForm1.Koef_A
  5. b = UserForm1.Koef_B
  6. c = UserForm1.Koef_C
  7. If a = 0 Then MsgBox “Уравнение имеет одно решение”
  8. d = b * b – 4 * a * c ‘Вычисляем дискриминант
  9. ‘Выводим его значение в строку 2, столбец 4

UserForm1.Disk_D = UserForm1.Koef_B + “*” + UserForm1.Koef_B + “-” + _

4* + UserForm1.Koef_A + ” *” + UserForm1.Koef_C + “=” + CStr(d)

  • ‘Обращаю внмание на вывод нестроковых значений в операторе Msgbox
  • ‘ Значение надо преобразовать в строковый тип данных
  • ‘Применяем условие для решения квадратных уравнений
  • If d >= 0 Then
  • ‘MsgBox “Решение есть”
  • x1 = (-b – Sqr(d)) / (2 * a)
  • x2 = (-b + Sqr(d)) / (2 * a)
  • UserForm1.Koren_x1 = x1
  • UserForm1.Koren_x2 = x2
  • Else
  • MsgBox “Решений нет”
  • End If
  • End Sub
  • Текст этой записи Простейшие макросы.doc
  • Файл Excel. содержащий рассмотренные примеры
  •  Перейти на запись об основах VBA
  • Перейти в рубрику Обучение с примерами макросов в Excel

Источник: http://amcher.ru/2014/11/12/primer-prostejshih-makrosov/

Ссылка на основную публикацию
Adblock
detector