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

ВАРИАНТ 5

Найти максимальное значение стороны малого основания правильной усе-
ченной пирамиды a1 (изменяется от l до n с шагом m) и соответствующие
ему значения f1 и f2 (f1 – площадь верхнего, f2 – площадь нижнего осно-
вания правильной усеченной пирамиды), для которых объем правильной
усеченной пирамиды не превышает объема куба со стороной b. a2 – сторо-
на нижнего основания и h – высота правильной усеченной пирамиды ос-
таются неизменными. Используя процедуру решить задачу для всех вари-
антов условий.


             l         n        m          b        a2        h
            0,8       6,1       0,1       6,8       6,2      5,1
            2,6       10,3     0,1       16,2      13,1      14,9
            0,1       1,1      0,01      0,91       1,3      0,37
            2,2       7,9       0,1       9,6       9,5      7,2
            0,7       2,6       0,1       6,3      3,9       11,1



ВАРИАНТ 6

Найти максимальное значение радиуса шара r (изменяется от r1 до r2 с
шагом k) и соответствующее значение радиуса основания r4, вырезанного
из этого шара шарового сегмента, для которых площадь поверхности ша-
рового сегмента не превышает площади поверхности куба со стороной a.
Высота шарового сегмента, h остается неизменной. Используя процедуру
решить задачу для всех вариантов условий.


            r1        r2         k         a         h
             1,5      12,6      0,1      3,8        1,3
            24,4      36,8      0,1      24,2      12,1
             1,4       5,6      0,1      2,1       0,93
            0,09      1,87     0,01      0,42      0,06
             5,2      23,1      0,1      9,6        4,8