Разработать программу, заполняющую первые два столбца активного листа значениями аргумента и функции

@Иван Аганин · Регистрация: 16.11.2011

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

Разработать программу, заполняющую первые два столбца активного листа значениями аргумента и функции y=2*x^2+3*x-1 в заданном пользователем диапазоне с заданным пользователем шагом.

toiai · 22.11.2011, 17:42

Наработки есть?

@Иван Аганин · 22.11.2011, 17:47 **[ТС]**

что-то пробовал,но ничего не получилось

toiai · 22.11.2011, 18:22

Visual Basic

Sub Макрос_1()
    Cells.Clear
    Dim nach As Double
    Dim konez As Double
    Dim shag As Double
    nach = InputBox("Введите начальное значение аргумента ")
    konez = InputBox("Введите конечное значение аргумента ")
    shag = InputBox("Введите шаг аргумента функции ")
    [A1] = "Начальное значение аргумента: " & nach
    [A2] = "Конечное значение аргумента: " & konez
    [A3] = "Шаг аргумента функции: " & shag
    [A5] = "х"
    [B5] = "У=2*x^2+3*x-1"
    j = 6
    For i = nach To konez Step shag
        Cells(j, 1) = i
        Cells(j, 2) = 2 * i ^ 2 + 3 * i - 1
        j = j + 1
    Next
    MsgBox "Расчет окончен"
End Sub

@Иван Аганин 1 / 1 / 0 Регистрация: 16.11.2011 Сообщений: 36
		1
	Разработать программу, заполняющую первые два столбца активного листа значениями аргумента и функции 22.11.2011, 13:58. Показов 1024. Ответов 3 Метки нет (Все метки) Разработать программу, заполняющую первые два столбца активного листа значениями аргумента и функции y=2x^2+3x-1 в заданном пользователем диапазоне с заданным пользователем шагом. 0

toiai 3218 / 967 / 223 Регистрация: 29.05.2010 Сообщений: 2,086
	22.11.2011, 17:42	2
	Наработки есть? 0

@Иван Аганин 1 / 1 / 0 Регистрация: 16.11.2011 Сообщений: 36
	22.11.2011, 17:47 [ТС]	3
	что-то пробовал,но ничего не получилось 0

	22.11.2011, 18:22