End Sub. 6.Сохраните проект сохраните его под именем Лр10_Зад4_Фамилия

6.Сохраните проект сохраните его под именем Лр10_Зад4 _Фамилия

ЗАВДАННЯ 10.5. Постановка задачи: ЗАДАН МАССИВ В ЦЕЛЫХ ЧИСЕЛ, СОДЕРЖАЩИЙ N ЭЛЕМЕНТОВ. СФОРМИРОВАТЬ НОВЫЙ МАССИВ D ТАКОЙ, ЧТО D(J)=В(I), ЕСЛИ Z1 <В(I)<Z2. Z1 И Z2 ЗАДАНЫ, ПРИЧЕМ Z1<Z2. Вид работающего приложения представлен на рис. 10.3. и 10.4

Рис. 10.3 Рис. 10.4

Порядок действий

1. Расположите на форме две метки, два текстовых поля и две кнопки (рис.10.3)

2. Значения свойств Caption формы, меток и кнопок установите в соответствии с рис. 10.3 и проrpаммным кодом.

3. Установите значения свойства Name объектов в соответствии с программным кодом.

4. Проанализируйте приведенный ниже проrpаммный код, а затем наберите его.

'Формuрование нового массива, количество элементов которого не совпадает с количеством элементов исходного массива