Файл: regeda_v_v_regeda_o_n_osnovy_programmirovaniya_na_vba.pdf

ВАРИАНТ

 15

Для

каждой

из

точек

, 

координаты

ко

-

торых

заданы

в

последовательном

файле

 coord.dat (

нечетные

записи

 – 

координаты

 x, 

четные

 – 

координаты

 y) 

определить

принадлежит

ли

эта

точка

заштрихованной

области

. 

Подсчитать

количество

проверяемых

точек

в

фай

-

ле

, 

количество

точек

принадлежащих

заштрихованной

области

, 

вывести

их

координаты

на

печать

. 

В

случае

обна

-

ружения

точек

с

одинаковыми

коор

-

динатами

выдать

сообщение

о

числе

повторов

каждой

неоднократно

встре

-

чаемой

точки

. 

ВАРИАНТ

 16

Для

каждой

из

точек

, 

координаты

ко

-

торых

заданы

в

последовательном

файле

 coord.dat (

нечетные

записи

 – 

координаты

 x, 

четные

 – 

координаты

y) 

определить

принадлежит

ли

эта

точка

заштрихованной

области

. 

Под

-

считать

количество

проверяемых

то

-

чек

в

файле

, 

количество

точек

при

-

надлежащих

заштрихованной

области

, 

вывести

их

координаты

на

печать

. 

В

случае

обнаружения

точек

с

одинако

-

выми

координатами

выдать

сообще

-

ние

о

числе

повторов

каждой

неодно

-

кратно

встречаемой

точки

. 

Y

X 

Y=

±√

2x+8

Y=x

Y=-x

Y=x

2

 - 9

Y

X 

Y=x

2

+4

ВАРИАНТ

 17

Найти

максимальное

значение

радиуса

шара

r

  (

изменяется

от

r1

до

r2 

с

шагом

k

) 

и

соответствующее

значение

радиуса

основания

r4

вырезанного

из

этого

шара

шарового

сегмента

, 

для

которых

площадь

поверхности

ша

-

рового

сегмента

не

превышает

площади

поверхности

куба

со

стороной

a

(

изменяется

от

a1

до

a2 

с

шагом

m 

одновременно

с

r

). 

Высота

шарового

сегмента

h

остается

неизменной

. 

Используя

процедуру

решить

задачу

для

всех

вариантов

условий

. 

r1 r2  k  a1  a2  m 

h 

1,3 9,4 0,1 13,1 1,2  -0,1  0,3 
4,9 12,1 0,1  8,6  3,1  -0,1 

2,5 

0,35 1,55 0,01 

0,12  -0,01 

0,2 

12,4 

18,6 

0,1    3,5 -0,1 11,2 

2,1 13,1 0,1 

0,2  -0,1 

1,4 

ВАРИАНТ

 18

Найти

минимальное

значение

угла

в

вершине

шарового

сектора

α

(

изменя

-

ется

от

α

1

до

α

2 

с

шагом

β

) 

и

соответствующее

значение

радиуса

основа

-

ния

r1

и

высоты

h

шарового

сектора

, 

для

которых

площадь

поверхности

шарового

сектора

не

меньше

площади

поверхности

прямоугольного

па

-

раллелепипеда

со

сторонами

t, b

и

 c

 (

сторона

b

изменяется

от

b1

до

b2 

с

шагом

k 

одновременно

с

углом

α

). 

Радиус

шара

r

остается

неизменным

. 

Используя

процедуру

решить

задачу

для

всех

вариантов

условий

. 

α

1 

α

2 

β

t b1 b2 k  c  r 

173 4  -1 3,6 0,3 14,8 0,1 2,4 12,1 
166 13  -1  1,3 0,1 2,1 0,1 6,9 8,2 
177  7  -1  5,2 0,7 13,3 0,1 4,4 9,9 
150 15  -1  8,8 1,1 33,1 0,1 2,9 22,6 
169  8  -1  2,4 0,4 12,2 0,1 3,7 7,7 

ВАРИАНТ

 19

Найти

минимальное

значение

радиуса

шара

r 

(

изменяется

от

r1

до

r2 

с

ша

-

гом

k

)  

и

соответствующее

значение

радиуса

нижнего

основания

r4

и

вы

-

соты

h

шарового

слоя

, 

для

которых

объем

шарового

слоя

не

меньше

объ

-

ема

прямоугольного

параллелепипеда

со

сторонами

t, b

и

 c

 (

сторона

c

из

-

меняется

от

 c1

до

c2 

с

шагом

m 

одновременно

с

r

). 

Центральный

угол

нижнего

основания

шарового

слоя

α

и

центральный

угол

верхнего

основа

-

ния

шарового

слоя

β

остаются

неизменными

. 

Используя

процедуру

ре

-

шить

задачу

для

всех

вариантов

условий

. 

r1 r2  k  t  b  c1 c2 m 

α

β

 0,6 11,6 0,1  1,5  2,4  7,7  1,3 -0,1 177 105 
 2,7 16,2 0,1  4,1 14,8 16,8 0,7 -0,1 169  22 
 0,1 0,9 0,01 1,1 0,02 5,2 1,1 -0,1 162 25 
 16,6  29,8  0,1  19,3  16,2 40,4 15,1 -0,1  155  5 
 14,2  22,4  0,1  15,1  27,2  55,5 22,6 -0,1  179  33 

ВАРИАНТ

 20

Найти

максимальное

значение

радиуса

верхнего

основания

усеченного

прямого

конуса

r1 

(

изменяется

от

l

до

n 

с

шагом

m

) 

и

соответствующее

значение

высоты

h2

и

образующей

ob

прямого

конуса

, 

для

которых

объем

усеченного

прямого

конуса

не

превышает

объема

шара

радиуса

r3

 ( 

изме

-

няется

от

 r4

до

r5 

с

шагом

k

одновременно

с

r1

). 

Радиус

нижнего

основа

-

ния

r2 

и

высота

h1

усеченного

прямого

конуса

остаются

неизменными

. 

Используя

процедуру

решить

задачу

для

всех

вариантов

условий

. 

l n m r4 r5 k r2 

h1 

0,3 4,4 0,1 15,5 5,1 -0,1 4,6 3,6 

0,13 0,99 0,01  3,2  0,3 -0,01

1,02 0,66 

1,8 4,4 0,1 12,2 1,9 -0,1 5,5 20,2 
2,1 13,9 0,1 16,8 4,6 -0,1 16,0 6,3 
0,8 2,5 0,1 4,4 1,1 -0,1 2,6 1,6 

ВАРИАНТ

 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 

ВАРИАНТ

 23

Найти

минимальное

значение

радиуса

шара

r 

(

изменяется

от

 r1

до

r2 

с

ша

-

гом

k

)  

и

соответствующее

значение

радиуса

основания

r3

и

высоты

h

ша

-

рового

сектора

, 

для

которых

объем

шарового

сектора

, 

для

которых

объем

шарового

сектора

не

меньше

объема

куба

со

стороной

t

 (

t

изменяется

от

 t1

до

t2 

с

шагом

m

одновременно

с

r

). 

Угол

α

,

в

вершине

сектора

остается

неизменным

. 

Используя

процедуру

решить

задачу

для

всех

вариантов

ус

-

ловий

. 

r1 r2  k  t1  t2 m 

α

3,9 0,1 -0,1 0,1 3,2 0,1  97 
1,1 0,1 -0,01 0,2 3,1 0,01 177 

15,8 3,5 -0,1 1,8 13,5 0,1  155 

8,3 0,8 -0,1 1,5 8,2 0,1 179 
9,6 1,8 -0,1 0,5 7,9 0,1 133 

ВАРИАНТ

 24

Найти

максимальное

значение

большой

высоты

усеченного

круглого

ци

-

линдра

 h2 

(

изменяется

от

 l

до

k 

с

шагом

m

), 

для

которого

объем

усеченно

-

го

круглого

цилиндра

не

превышает

объема

прямоугольного

параллелепи

-

педа

со

сторонами

a, b

и

  c

  (

сторона

a

изменяется

от

 a1

до

a2 

с

шагом

n 

одновременно

с

h2

). 

Радиус

основания

усеченного

круглого

цилиндра

r,

и

его

меньшая

высота

h1

остаются

неизменными

. 

Используя

процедуру

ре

-

шить

задачу

для

всех

вариантов

условий

. 

l k m a1 

a2 a b c r h1 

 1,3 26,1 0,1 31,2 14,3 -0,1 2,6  2,0  1,6  2,4 
 0,2 3,9 0,1 10,1 0,2 -0,1 1,7 0,9 0,5 0,2 
 4,1 16,2 0,1 22,9 4,6 -0,1 21,1 15,0 12,7  3,4 
 2,0 8,1 0,1 17,3 5,2 -0,1 2,5 8,1 3,7 1,1 
 4,1 15,8 0,1 33,6 13,2 -0,1 9,9  6,4  7,9  5,1