powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Задачка на метод последовательного приближения в VBA (Excel)
4 сообщений из 4, страница 1 из 1
Задачка на метод последовательного приближения в VBA (Excel)
    #38687488
Dmitry1238
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем привет! У меня возникли трудности с решением задачки, так как к сожалению мои познания в програмировании стремятся к нулю. Задача следующая:
Дано: Q0=3000000 t1=320 t3=278.5 F=24460 k=5.25
Задаем t2

tлог=(t1-t2)/ln(1+(t1-t2)/(t2-t3))

Q1= k*F*tлог

Необходимо, чтобы программа подобрала такое значение t2, чтобы равенство Q0=Q1 выполнялось с погрешностью не более 1%.
Так же необходимо вывести полученное значение t2 в ячейку Excel.

Прошу вашей помощи!
...
Рейтинг: 0 / 0
Задачка на метод последовательного приближения в VBA (Excel)
    #38687683
капитанская дочка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dmitry1238,

уроки аль лекции прогулял? точ такая же задача как у тя решена здесь
...
Рейтинг: 0 / 0
Задачка на метод последовательного приближения в VBA (Excel)
    #38695199
Volodbka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dmitry1238, проверяй
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Sub Dmitry1238()
Dim Q0, Q1
Dim t1, t2, t3
Dim tlog, f, k

Q0 = 3000000
t1 = 320
t3 = 278.5
f = 24460
k = 5.25

For t2 = 1000 To 0 Step -0.1
tlog = (t1 - t2) / (Log(1 + (t1 - t2) / (t2 - t3)) / Log(Exp(1)))
Q1 = k * f * tlog
If Abs((Q1 - Q0) / Q1) < 0.01 Then Exit For
Next t2

MsgBox "t2=" & t2 & Chr(10) & "Q1=" & Q1

End Sub
...
Рейтинг: 0 / 0
Задачка на метод последовательного приближения в VBA (Excel)
    #38695202
Volodbka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
осталось только вспомнить что такое - метод последовательных приближений
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Задачка на метод последовательного приближения в VBA (Excel)
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]