Cells(1, 2) = "y"
    Dim a(0 To 19, 0 To 1) As...">

Y=e^x-ln2x (интервал от 1 до 10) ШАГ 0.5 нужно написать программу в vba excel. СРОЧНО!!!

0 голосов

Y=e^x-ln2x (интервал от 1 до 10) ШАГ 0.5
нужно написать программу в vba excel. СРОЧНО!!!


спросил от (22 баллов) в категории Информатика
оставил комментарий от (22 баллов)

Просто нужно написать программу

оставил комментарий от (22 баллов)

найти значения функции по формуле при значениях из интервала с шагом

оставил комментарий от (22 баллов)

должно быть: начало

оставил комментарий от (22 баллов)

потом ввод; нач.зн кон.зн. шаг ; у= ; вывод у ; конец

оставил комментарий от (22 баллов)

function y(x)

1 Ответ
0 голосов
ответил от БОГ (150k баллов)
 
Лучший ответ

Sub aaa()
    Cells(1, 1) = "x"
    Cells(1, 2) = "y"
    Dim a(0 To 19, 0 To 1) As Double
    For i = 0 To 19
        x = 0.5 * i + 1
        a(i, 0) = x
        a(i, 1) = Exp(x) - Log(2 * x)
        Next i
    Range("A2:B20") = a
End Sub

Вставить на лист рабочей книги и запустить


image
...