Основы и принципы работы в VBA. Часть 2: Методические указания к выполнению лабораторных работ, страница 3

Вариант

Задание

1

2

1

Составить программу вывода в ячейки рабочего листа Excel всех четных чисел от 0 до 20

2

Составить программу вывода в ячейки рабочего листа Excel всех четных чисел от 0 до 20 в порядке убывания

3

Составить программу вывода в ячейки рабочего листа Excel всех нечетных чисел от 1 до 15

4

Составить программу вывода на печать всех нечетных чисел от 5 до 15 в порядке убывания

5

В компьютер последовательно ввести данные (двадцать значений) в дюймах. Преобразовать  эти данные  в метры  (1 дюйм = 0,0254 м) и вывести их на лист Excel в виде таблицы

6

В компьютер последовательно ввести 15 чисел. Эти данные представленные в градусах, перевести в радианы и вывести их на лист Excel в виде таблицы

1

2

7

В компьютер последовательно ввести 10 произвольных чисел х. Составить программу, которая печатала бы в четыре столбца следующие результаты: х, FIX(x), INT(x), CINT(x)

8

В компьютер ввести последовательно 12 произвольных чисел х, составить программу, которая печатала бы в три столбца следующие результаты: х, arcsinx, аrcosx, и вывести их на лист Excel в виде таблицы

9

Написать программу, которая выводит на лист Excel квадраты и кубы целых чисел а от 1 до 10  в виде таблицы. Столб­цы таблицы должны иметь обозначения, например: а, а², а³

10

Составить программу перевода значений температуры по шкале Цельсия от 0 до 100 градусов с шагом в пять градусов в их эквиваленты по шкале Фаренгейта. Для перевода использовать формулу:
t_F = 9t_С/5 + 32. Результат перевода вывести на лист Excel в виде
таблицы

11

Составить программу перевода 1, 2, …, 20 долларов США в рубли по текущему курсу (курс вводится через окно InputBox). Результат перевода вывести на лист Excel в виде таблицы

12

Составить программу  распечатки стоимости 50, 100, 150,…, 1000г. сыра. Стоимость 1 кг сыра ввести в окне InputBox, вывести результат на лист Excel в виде таблицы

13

Составить таблицу соответствия между весом в фунтах и весом в килограммах для значений 1, 2, …, 10 фунтов (1 фунт = 453 г).
Вывести данные на лист Excel в виде таблицы

14

Рассчитать значения удля значений х, равных 4, 5, …, 28, если у задается формулой: y = 2t² +5,5t –2, где  t = x + 2

15

Вывести данные на лист Excel в виде таблицы значения sin 0,1;
sin 0,2; ...; sin1,1

Вариант

Функция

Диапазон изменения аргументов

Шаг изменения аргументов

1

2

3

4

1

–π/2 ≤  x ≤  π/2

2 ≤  a  ≤  10

∆x = π/10

∆a = 1

2

0 ≤  x  ≤  π

∆x = π/10

3

0 ≤  x  ≤  π

1 ≤  a  ≤  4

∆x = π/10

∆a = 0,5

4

–π ≤  x  ≤  π

1,5 ≤  a  ≤  2

∆x = π/10

∆a = 0,1

5

0 ≤  x ≤  π

3 ≤  a ≤  3,5

∆x = π/10

∆a = 0,1

6

0 ≤  x  ≤  π

2 ≤  b  ≤ 3

∆x = π/10

∆b = 0,1

7

–1 ≤  x  ≤  1

1 ≤  a  ≤ 2

∆x = 0,2

∆a = 0,2

8

–1 ≤  x  ≤  1

10 ≤  c  ≤  20

∆x = 0,3

∆c = 5

9

–1 ≤  x  ≤  1

2 ≤ c ≤ 3

∆x = 0,25

∆c  = 0,25

10

–1 ≤  x  ≤  2

1 ≤  a  ≤  5

∆x = 0,2

∆a = 0,6

11

–π ≤  x  ≤  π/2

2 ≤  a  ≤  4

∆x = π/20

∆a = 0,5

12

2 ≤  x  ≤  3

1 ≤  a  ≤  2

∆x = 0,1

∆a = 0,2

13

–π ≤  x ≤  π

2 ≤  a  ≤  4

∆x = π/10

∆a = 0,1

1

2

3

4

14

–π/2 ≤ x ≤  π/2

2 ≤  b ≤  3

∆x = π/10

∆b = 0,1

15

0 ≤  x ≤  π

2 ≤  a  ≤  3

∆x = π/10

∆a = 0,5