Пример решения задачи. Пример решения и оформления задачи

Пример решения и оформления задачи

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

При изучении курса «Информатика» необходимо выполнить контрольную работу. Номер варианта задания определяется как сумма двух последних цифр номера зачетной книжки (0 соответствует варианту 10). Каждый вариант содержит два теоретических вопроса и задачу.

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

На первые два теоретических вопроса следует дать развернутые и корректные ответы, которые должны быть набраны в MS Word и распечатаны на принтере.

Первую задачу после вычислений необходимо оформить в текстовом процессоре MS Word или табличном процессоре MS Excel.

Вторую и третью задачи необходимо выполнить с помощью VBA: написать программы с использованием циклов For…Next, Do While…Loop, отладить их и распечатать тексты программ.

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

а) Перевести из шестнадцатеричной системы счисления в двоичную:

13₁₆

Выполнить перевод числа 10011₂ в десятичную систему счисления.

Пример решения задачи

13₁₆ = 1 • 16¹ + 3 • 16⁰ = 16 + 3 = 19.

Таким образом, 13₁₆ = 19.

10011₂ = 1 • 2⁴ + 0 • 2³ + 0 • 2² + 1 • 2¹ + 1 • 2⁰ = 16+0+0+2+1 = 19.
Таким образом, 10011₂ = 19.

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

В ячейки в Microsoft Excel вносятся любые пять чисел.

Реализация данной задачи отражена в программном коде:

Sub Пример1()

Dim i As Integer

i = 2 ‘ неявно объявляем переменную для номера строки.

s = 0 ‘обнуляем первоначальную сумму.

Do While Cells(i, 1) <> "" ‘выполняем цикл, пока не встретится пустая ячейка в столбце А.

s = s + Cells(i, 1) ‘суммируем цифры.

i = i + 1 ‘увеличиваем переменную смещения строк для изменения адресов ячеек.

Loop ‘окончание цикла.

Range("B1") = " Сумма чисел равна" ‘вводим в ячейку В1 поясняющую надпись.

Range("C1") = s ‘помещаем вычисленную сумму в ячейку С1.

End Sub

В окне Microsoft Excel получим следующий результат:

в) Заполните 6 строк электронной таблицы MS Excel, имеющей следующие поля:

Наименование товара

Дата продажи

Цена за единицу

Количество проданного товара

Создать программу VBA, рассчитывающую скидку в 5% по каждой покупке.

Дата добавления: 2014-12-08