1) Ввести значение переменной n. Ввести значение m. Ввести матрицу A(), в которой n-количество строк, а-количество столбцов. Ввести матрицу В() в которой m-количество строк, а n-количество столбцов. 2) Транспонировать матрицу В и получить матрицу Вtransp() 3) Найти матрицу С()=А()+Btransp()
Код к задаче: «Составить блок-схему алгоритма и программу на VBA»
Листинг программы
Dim A() As Integer, B() As Integer, i As Integer, j As Integer Dim k As Integer, n As Integer, m As Integer Cells.Clear n = InputBox(«Введите n») m = InputBox(«Введите m») Randomize ReDim A(n, m) As Integer ReDim B(m, n) As Integer For i = 0 To n For j = 0 To m A(i, j) = InputBox(«Введите элемент матрицы А(): «) Cells(i + 2, j + 3) = A(i, j) Next j Next i For i = 0 To m For j = 0 To n B(i, j) = InputBox(«Введите элемент матрицы B(): «) Cells(i + 2, j + m + 5) = B(i, j) Next j Next i
Источник: studassistent.ru
VBA в Excel. Циклы.
Лабораторная работа №2 Тема: Разработка программ линейной структуры в среде vba.
1) Способ представления алгоритма в виде блок-схемы.
Разработанный алгоритм (строгая последовательность действий, приводящая от исходных данных к результату) должен быть представлен в виде удобном для последующего перевода его в программу. Наиболее простой формой записи алгоритмов является естественный язык. Его словесная формулировка присутствует в сознании разработчика, пусть даже не нанесенная на бумагу. Чаще всего используют графическую форму записи алгоритмов.
Описание алгоритма в виде графических элементов и связей между ними называется блок-схемой.
От чисто текстовой записи на естественном языке блок-схема отличается следующим:
- каждому действию соответствует определенный вид фигуры: овал, прямоугольник, параллелограмм, ромб, шестиугольник (Приложение 1);
- внутри фигур записываются формулы или краткая инструкция;
- фигуры соединяются линиями со стрелками, которые называются линиями потока и указывают направления перехода от одной операции к другой;
- фигуры или блоки в блок-схемах могут иметь номера, проставляемые слева в разрыве верхней линии;
- линии потока не должны пересекаться, поэтому при необходимости используются соединители – элементы с буквой или цифрой внутри.
2) Линейная структура программы в vba.
Программа на VBA представляет собой последовательность строк. Выполнение линейной программы осуществляется построчно. Основными компонентами программы являются операторы, из которых и состоят строки. Одна строка программы может содержать один или несколько операторов, операторы в строке отделяются друг от друга двоеточием.
Пример 1. Составить в виде блок-схемы и программы алгоритм вычисления объёма розничного товарооборота T = R*N с учётом того, что среднесписочное число работников составляет R=20 и средний оборот на одного работника N=80,50 руб.
Решение: Прежде, чем проводить вычисления по формуле необходимо ввести значения переменных. Среднесписочное работников R имеет целочисленное значение (Integer), средний оборот на одного работника N имеет вещественное значение (Single), результат — объём розничного товарооборота, переменная Т так же имеет вещественное значение (Single).
Блок-схема данного алгоритма имеет вид:
Dim R As Integer
Dim N, T As Single
R = InputBox(«Введите число работников», «Окно ввода»)
N = InputBox(«Введите средний оборот», «Окно ввода»)
MsgBox «Объём товарооборота left»> End Sub
Рис. 14. Блок-схема алгоритма и текст программы Примера 1 на языке VBA
Источник: studfile.net
Как составлять блок схемы в vba
Программа на VBA представляет собой последовательность строк. Выполнение линейной программы осуществляется построчно. Основными компонентами программы являются операторы, из которых и состоят строки. Одна строка программы может содержать один или несколько операторов, операторы в строке отделяются друг от друга двоеточием.
Пример 1. Составить в виде блок-схемы и программы алгоритм вычисления объёма розничного товарооборота T = R*N с учётом того, что среднесписочное число работников составляет R=20 и средний оборот на одного работника N=80,50 руб.
Решение: Прежде, чем проводить вычисления по формуле необходимо ввести значения переменных. Среднесписочное работников R имеет целочисленное значение (Integer), средний оборот на одного работника N имеет вещественное значение (Single), результат — объём розничного товарооборота, переменная Т так же имеет вещественное значение (Single).
Блок-схема данного алгоритма имеет вид:
3) Наберите в Окне редактирования кода Листа программу (рис. 14), в которой выполнено описание переменных, их ввод в диалоговое окно ввода, вычисление проведено при помощи оператора присваивания и вывод осуществляется в диалоговое окно вывода.
4) Запустите программу на счёт кнопкой Run Sub ;
5) Выполните ввод числовых значений:
в диалоговое окно с подсказкой – «Введите число работников»
наберите с клавиатуры – 20 в диалоговое окно с подсказкой – «Введите средний оборот» наберите с клавиатуры – 80,50
Рис. 15. Вид диалогового окна ввода InputBox
6) Программа выведет на экран монитора диалоговое окно с результатом вычислений:
Рис. 16. Вид диалогового окна вывода MsgBox
Индивидуальные задания для самостоятельной работы
При выполнении лабораторных работ и индивидуальных заданий студент выбирает вариант своего задания в соответствии с номером занимаемого компьютера в компьютерном классе.
Задание 1. По предложенной блок-схеме разработать программу. Используя функцию Round, округлить результаты вычислений.
1.  |
2. V=(p*r 2 )*h |
 |
 |
| 3. Вывести на экран сообщение: «Здравствуй (свое имя)». | 4. Вывести на экран сообщение: «Как твои дела (свое имя)?». |
 |
 |
| 5. Y=a 2 sin b ( a-b 3 ) | 6. Y=a 2 + b 2 sin c |
|
 |
7. Y=  |
8. Y=  |
 |
| 9. Y=b 2 sin a (c — b 2 ) | 10.  |
 |
 |
Задание 2. Требуется составить и отладить программу на языке VBA и выполнить по ней расчеты на ПЭВМ. Используя функцию Round, округлить результаты вычислений.
| вариант задания | условие задачи |
 |
|
 |
|
 |
|
 |
|
 |
|
 |
|
 |
|
 |
|
| Y=a+x(b+x(c+dx)) | |
 |
Задание 3. Выполнить математическую постановку задачи. По разработанному алгоритму составить и отладить программу на языке VBA и выполнить по ней расчеты на ПЭВМ. Используя функцию Round, округлить результаты вычислений.
Варианты задания 3
1. Вычислить уровень выполнения плана розничного товарооборота
, где F — фактический розничный товарооборот,
T — план розничного товарооборота.
2. Рассчитать степень новизны изделия
, где M — сумма высших рангов новизны изделия,
K — число баллов, характеризующих новизну анализируемого из
делия.
3. Рассчитать эстетический показатель качества товаров
, где R — значение обобщенного эстетического показателя,
4. Вычислить коэффициент стабильности ассортимента товаров
, где N — количество проверок,
K1 — количество разновидностей товаров в момент проверки,
K2 — количество разновидностей товаров, предусмотренных ас
сортиментным минимумом.
5. Вычислить номинальную цену акции
, где Рn – номинальная цена акции,
Сар – уставный капитал акционерного общества,
М – число выпущенных акций.
6. Определить котировку акции на вторичном рынке ценных бумаг
,где К – курс акции,
Pn – номинальная цена акций.
7. Рассчитать конечную сумму по погашению долга с процентами:
S = P * (1 + n * i), где S – наращенная сумма долга,
Р – первоначальная сумма ссуды,
8. Вычислить величину разового погасительного платежа.
, где R – величина разового погасительного платежа,
S – наращенная сумма долга,
9. Найти балансовую прибыль предприятия
ПБ = П + ПП +ПВ, где ПБ – прибыль балансовая,
ПП– прибыль от прочей реализации,
ПВ – прибыль от внереализационных доходов.
10. Рассчитать долю населения трудоспособного возраста в общей численности населения.
D = TH / H, где D – долю населения трудоспособного возраста,
Тема: Разработка программ разветвленной структуры в среде VBA
Цель работы:
— Применить умения при составлении алгоритма решения задачи в виде блок-схемы.
— Освоить приемы программирования разветвлений.
— Получить навыки составления программ разветвленной структуры.
Как составлять блок схемы в vba
Купить рекламу на форуме 15-35 тыс рублей в месяц
Здравствуйте.
Задачка такая:
Нужно сделать в VBA эффект развертывания схемы, по принципу ниспадающего меню.
Например в изначальном состоянии блок-схема должна представлять подобный вид:
21.png
И чтобы при нажатии на красные блоки развертывалось продолжение схемы:
Безымяннвый.jpg
видите-ли главная особенность ядерной бомбы, что она постоянно падает в эпицентр взрыва!
так вот у комментариев аналогичная главная особенность, чтобы Вы в них не написали — это НИКАК не влияет на выполнение макроса
поэтому в комментариях можете смело задавать произвольные значения, макросу по-барабану какие именно
видите-ли главная особенность ядерной бомбы, что она постоянно падает в эпицентр взрыва!
так вот у комментариев аналогичная главная особенность, чтобы Вы в них не написали — это НИКАК не влияет на выполнение макроса
поэтому в комментариях можете смело задавать произвольные значения, макросу по-барабану какие именно
| Похожие темы | ||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| блок-схема в VBA | Мухаммад | Помощь студентам | 05.06.2014 16:05 | |
| Нужен алгоритм блок-схема для этого кода в VBA | inflamedparadox | Помощь студентам | 26.01.2014 23:02 | |
| Блок-схема по готовой программе vba | PetrWS | Microsoft Office Excel | 1 | 24.05.2011 16:57 |
| Схема алгоримта (блок схема) на задачу по Паскалю | LINCHAK | Помощь студентам | 22.10.2010 15:56 | |
| Блок схема алгоритма программы и схема взаимодействия модулей. | Lazio | Фриланс | 3 | 02.12.2009 23:10 |
Ролики c форумного канала, чтобы скрыть этот блок — зарегистрируйтесь на форуме
Microsoft Excel
Как при помощи средств Excel создать простую блок-схему
Блок-схемы являются визуальными представлениями отдельных этапов, из которых состоит тот или иной процесс. Они могут представлять особый интерес с точки зрения процесса оценки качества, поскольку графическое отображение процесса зачастую помогает выявить «узкие места», которые могут создавать проблемы с качеством.
Блок-схемы также можно строить в Excel, хотя сам по себе процесс построения является несколько запутанным. Если вам придется строить очень сложную блок-схему, мы рекомендуем воспользоваться одним из специализированных программных пакетов, предназначенных для этой цели. Если же вам нужна относительно простая блок-схема, подобная той, которая изображена на рис. 1, тогда вы вполне можете обойтись средствами Excel.
Небольшие блок-схемы в программе Excel можно создавать с помощью кнопки Shapes (Фигуры), которая расположена в группе Illustrations (Иллюстрации) вкладки Insert (Вставка) (рис. 2).
Рис. 2. Обширный перечень разнообразных фигур
Щелкните на кнопке Shapes (Фигуры), чтобы открыть меню с обширным перечнем фигур, имеющихся в вашем распоряжении. Как показано на рис. 3, группа фигур Flowchart (Блок-схема) — седьмая сверху. В группе Flowchart (Блок-схема) предусмотрено несколько нужных нам форм. Щелкните на значке требуемой формы, а затем перетащите указатель мыши в пределах рабочего листа для ее создания.
Рис. 3. Группа фигур Flowchart (Блок-схема)
После создания фигуры в правой части ленты Microsoft Excel появится вкладка Format (Формат). Параметры этой вкладки предназначены для изменения формата выделенной в данной момент фигуры. Например, для изменения цвета выделенной фигуры достаточно щелкнуть на кнопке Shape Fill (Заливка фигуры), а затем — на образце интересующего вас цвета, как показано на рис. 4 (не забывайте, что наш рисунок — черно-белый).
Рис. 4. Изменение цвета фигуры с помощью меню кнопки Shape Fill (Заливка фигуры)
Щелкните внутри выбранной вами фигуры, введите требуемый текст. Аналогичным образом создайте еще несколько фигур для вашей блок-схемы. Отдельные блоки блок-схемы можно соединять между собой линиями и стрелками, которые в меню кнопки Shapes (Фигуры) расположены в группе Lines (Линии) (см. рис. 4).
Источник: remnabor.net