Вычислить функцию y=xx, результаты вывести в массив 210

@Shnider · Регистрация: 15.05.2012

Author24 — интернет-сервис помощи студентам

Вычислить функцию y=x*x, результаты вывести в массив 2*10, (x принадлежит промежутку от 1 до 10 включительно).

@mc-black · 15.05.2012, 13:15

Visual Basic

Sub qw()
    Dim a(1 To 2, 1 To 10) As Long
    Dim x As Long, y As Long
    
    For x = 1 To 10
        y = x * x
        a(1, x) = x
        a(2, x) = y
    Next x
End Sub

@Shnider 0 / 0 / 0 Регистрация: 15.05.2012 Сообщений: 9
		1
	Вычислить функцию y=xx, результаты вывести в массив 210 15.05.2012, 11:07. Показов 972. Ответов 1 Метки нет (Все метки) Вычислить функцию y=xx, результаты вывести в массив 210, (x принадлежит промежутку от 1 до 10 включительно). 0

	15.05.2012, 13:15