Основы программирования на VBA. Регеда В.В - 104 стр.

UptoLike

Составители: 

ВАРИАНТ 21
Найти максимальное значение внешнего радиуса цилиндрической трубы
r2
(изменяется от l до n с шагом m) для которого объем цилиндрической
трубы не превышает объема куба со стороной
a (изменяется от a1 до a2 с
шагом
k одновременно с r2). Внутренний радиус r1 и высота h цилиндри-
ческой трубы остаются неизменными. Используя процедуру решить задачу
для всех вариантов условий.
l n m a1 a2 k r1 h
2,5 12,8 0,1 15,5 2,1 -0,1 2,2 3,9
0,39 2,88 0,01 2,27 0,31 -0,01 0,33 0,61
24,1 51,9 0,1 44,2 22,5 -0,1 19,6 14,2
4,0 19,2 0,1 16,8 6,6 -0,1 2,9 8,2
1,9 18,2 0,1 22,4 12,5 -0,1 1,1 26,2
ВАРИАНТ 22
Найти минимальное значение центрального угла нижнего основания ша-
рового слоя
α (изменяется от α1 до α2 с шагом γ) и соответствующее зна-
чение радиуса нижнего основания
r1, радиуса верхнего основания r2 и вы-
соты
h шарового слоя, для которых площадь поверхности шарового слоя
не меньше площади поверхности прямоугольного параллелепипеда со сто-
ронами
a, b и c (сторона a изменяется от t1 до t2 с шагом k одновременно с
α). Радиус шара
r, из которого вырезан шаровой слой, и центральный угол
верхнего основания шарового слоя α остаются неизменными. Используя
процедуру решить задачу для всех вариантов условий.
α
1 α2 γ
t1 t2 k b c r
β
160 25 -1 1,2 4,4 0,1 2,9 0,3 6,6 22
175 13 -1 4,1 12,3 0,1 13,5 4,2 19,1 7
168 33 -1 0,3 2,9 0,1 4,7 2,2 2,6 30
178 20 -1 0,1 2,6 0,1 1,0 0,5 0,6 13
170 34 -1 2,2 7,7 0,1 3,0 10,1 9,3 22
ВАРИАНТ 21

Найти максимальное значение внешнего радиуса цилиндрической трубы
r2 (изменяется от l до n с шагом m) для которого объем цилиндрической
трубы не превышает объема куба со стороной a (изменяется от a1 до a2 с
шагом k одновременно с r2). Внутренний радиус r1 и высота h цилиндри-
ческой трубы остаются неизменными. Используя процедуру решить задачу
для всех вариантов условий.


         l         n           m          a1          a2          k          r1        h
         2,5      12,8         0,1        15,5         2,1        -0,1      2,2        3,9
        0,39      2,88        0,01        2,27        0,31       -0,01     0,33       0,61
        24,1      51,9         0,1        44,2        22,5        -0,1     19,6       14,2
         4,0      19,2         0,1        16,8         6,6        -0,1      2,9        8,2
         1,9      18,2         0,1        22,4        12,5        -0,1      1,1       26,2


ВАРИАНТ 22

Найти минимальное значение центрального угла нижнего основания ша-
рового слоя α (изменяется от α1 до α2 с шагом γ) и соответствующее зна-
чение радиуса нижнего основания r1, радиуса верхнего основания r2 и вы-
соты h шарового слоя, для которых площадь поверхности шарового слоя
не меньше площади поверхности прямоугольного параллелепипеда со сто-
ронами a, b и c (сторона a изменяется от t1 до t2 с шагом k одновременно с
α). Радиус шара r, из которого вырезан шаровой слой, и центральный угол
верхнего основания шарового слоя α остаются неизменными. Используя
процедуру решить задачу для всех вариантов условий.


   α1        α2          γ           t1          t2          k         b          c          r    β
  160        25          -1        1,2       4,4           0,1         2,9    0,3           6,6   22
  175        13          -1        4,1       12,3          0,1        13,5    4,2          19,1   7
  168        33          -1        0,3       2,9           0,1         4,7    2,2           2,6   30
  178        20          -1        0,1       2,6           0,1         1,0    0,5           0,6   13
  170        34          -1        2,2        7,7          0,1         3,0    10,1          9,3   22