Вычислить квадратный корень

ID работы - 641824
математика (контрольная работа)
количество страниц - 3
год сдачи - 2012

---

СОДЕРЖАНИЕ:

---

Постановка задачи
Вычислить квадратный корень из суммы квадратов нечётных элементов

---

ВВЕДЕНИЕ:

---

Динамический массив intA() и переменную n объявляются глобальными в модуле формы Public intA() As Integer, n As Integer

Для события Click кнопки Command1
Private Sub Command1_Click()
Dim i As Integer, kvs As Integer
n = Val(txtN.Text) 'считывание n
ReDim intA(n) As Integer ' переопределение массива intA
Cls
CurrentY = 1245
'Ввод и вывод исходных данных
Print " ИСХОДНЫЕ ДАННЫЕ"

---

СПИСОК ЛИТЕРТУРЫ:

---

Цена: 1000.00руб.