Найти корни уравнения

@pupok5 · Регистрация: 23.11.2010

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

Народ, доброго всем времени суток.
Помогите пожалуйста написать/решить уравнение в qbasic`e.

Y=lnx^3+2cos-2.

Начальный по Х=1, конечный Х=5, шаг по Х=0,4

Пример как мне кажется такой:

PureBasic

rem
for x=1 to 5, step 0,4 (только вот уже эта строчка красным гореть начинает. ;( )
y=lnx^3+2cos-2
print x,y
next x
end

Заранее спасибо.

@Shkap · 24.11.2010, 12:48

PureBasic

cls
for x=1 to 5 step .4
y = log(x^3)+2*|!REG3XP3!>cos(-2)
print x,y
next x

Добавлено через 5 часов 13 минут
а теперь я узнал как правильно так что вот

PureBasic

cls
FOR x=1 TO 5 STEP .4
y = exp(1)^(x^3)+2*|!REG3XP3!>COS(-2)
PRINT x,y
NEXT x

@pupok5 · 05.12.2010, 14:39 **[ТС]**

Windows 7 x64. qbasic 64. Пишет ошибку в функции выше и не дает запустить программу. Что делать? Сдавать уже надо.(((

@кот Бегемот · 05.12.2010, 17:51

не надо ничего выдумывать

PureBasic

FOR x = 1 TO 5.1 STEP .4
y = LOG(x ^ 3) + 2 * COS(-2)
PRINT x, y
NEXT x

@pupok5 · 05.12.2010, 18:38 **[ТС]**

кот Бегемот, окей. А как график построить, не подскажите в нем же, после вычислений?

@Shkap · 06.12.2010, 07:52

Сообщение от кот Бегемот

не надо ничего выдумывать

PureBasic

FOR x = 1 TO 5.1 STEP .4
y = LOG(x ^ 3) + 2 * COS(-2)
PRINT x, y
NEXT x

ну я логорифмы плохо знаю, но мне сказали, что вторым вариантом, тоже можно так вычислить.

Добавлено через 5 минут

Сообщение от pupok5

А как график построить, не подскажите в нем же, после вычислений?

PureBasic

screen 12
FOR x = 1 TO 5.1 STEP .4
y = LOG(x ^ 3) + 2 * COS(-2)
PRINT x, y
 
NEXT x
FOR x = 1 TO 5.1 STEP .4
y = LOG(x ^ 3) + 2 * COS(-2)
pset (x+100, y+100)
NEXT x

правда такой график будет гдето в центре экрана (и я не знаю можно ли в координатах давать выражения а васика на компе где я сейчас сижу нет), и он будет перевернут относительно Ох (но есть какаято команда, которая как начало отсчета ставит указанные точки, я ее не помню. если знаешь вставь в 5 строку). больше ничем помочь не могу так что простите что так...

@кот Бегемот · 06.12.2010, 08:32

Ну, не знаешь - и не хрен давать глупые советы.
1. График надо строить не по 10 точкам, а по сотне, иначе вместо кривой будут 10 точек в разных местах экрана. То есть для графика в цикле шаг надо взять не 0.4, а, например, 0.04.
2. Надо провести оси и, в зависимости от того, где они пройдут, выбрать коэффициент смещения графика вниз.
3. Надо перевернуть ось Y, потому что она направлена вниз из верхнего угла экрана, то есть Y для графика будет = коэффициент смещения -Y
4. Надо будет выбрать коэффициенты растяжения графика, иначе, при малых X и Y этот график может никто не увидеть. Поэтому значения X и Y для графика надо будет умножить на этот коэффициент. В итоге команда PSET будет выглядеть так:

PureBasic

1	PSET(xkrx,ksm-ykry),

где k- коэффициенты смещения и растяжения.
5. Если x принимает отрицательные значения, то график надо будет смещать и по оси х, то есть добавлять коэффициент смещения по х.
Остальное как в программе

@Quiet Snow · 06.12.2010, 09:33

Кстати, только что увидел что Шкап экспоненту вместо логарифма влепил...
Shkap, ты если что-то плохо знаешь всегда можешь открыть поисковик пробить там термины и тебе всё на блюдечке с каёмочкой вылезет, не спеши, я сам когда спешу косячу жутко(КБ знает

)

Кстати говоря, программа по выводу уже была(даже в полярной системе координат), если б тогда Кот тему закрепил сейчас бы глупых вопросов/советов не было))), хотя не кодеры туда бы и заходить не стали, ну это не важно.

но мне сказали, что вторым вариантом, тоже можно так вычислить.

Того, кто тебе это сказал советую больше не слушать, первый раз ты верно написал.

@kazak · 06.12.2010, 11:42

Помнится у старого qbasic, который под ДОС, был специальный оператор - выделения координатной области

PureBasic

1	WINDOW (x1,y1)-(x2,y2)

где х1,х2,у1,у2 границы этой области, тогда никаких дополнительных коэффициентов вычислять не надо.

@Quiet Snow · 06.12.2010, 13:21

kazak, все это знают какбы, это внутреннее логическое преобразование осей...

@кот Бегемот · 06.12.2010, 13:26

kazak, окно то ты сделаешь, но это ничего не изменит: оси всё равно надо переворачивать и увеличивать масштаб графика.

@Quiet Snow · 06.12.2010, 13:41

оси всё равно надо переворачивать

Если не ошибаюсь Window позволяет перевернуть оси, да и масштабирует не целочисленным способом(т.е. очень точно на FPU).

Добавлено через 2 минуты
Лично я предпочитаю способ когда экран остаётся экраном, уже привык к тому как организована видеопамять, а если оси поменяешь уже ничего нарисовать не удастся(менять оси по 100 раз не вариант). Метод КБ лучше да и модифицировать его под задачу удобнее.

@kazak · 06.12.2010, 13:46

Сообщение от >Quiet Snow<

Лично я предпочитаю способ когда экран остаётся экраном, уже привык к тому как организована видеопамять, а если оси поменяешь уже ничего нарисовать не удастся(менять оси по 100 раз не вариант). Метод КБ лучше да и модифицировать его под задачу удобнее.

Думаю это дело вкуса.

@Quiet Snow · 06.12.2010, 13:51

Думаю это дело вкуса.

Да я ничё не говорю, в хороших руках это отличный инструмент, позволяющий уменьшить код и сэкономить время. Просто когда нужна гибкость первый вариант предпочтительнее, хотя в контексте задачи принципиальной разницы нет.

@Shkap · 06.12.2010, 17:29

Сообщение от >Quiet Snow<

Того, кто тебе это сказал советую больше не слушать, первый раз ты верно написал.

я и так учителя по математике не слушаю

@Shkap Оранжевый портфель. 60 / 58 / 47 Регистрация: 13.11.2010 Сообщений: 459
	06.12.2010, 17:29	15
	Сообщение от >Quiet Snow< Того, кто тебе это сказал советую больше не слушать, первый раз ты верно написал. я и так учителя по математике не слушаю 0

@pupok5 0 / 0 / 0 Регистрация: 23.11.2010 Сообщений: 9
	05.12.2010, 14:39 [ТС]	3
	Windows 7 x64. qbasic 64. Пишет ошибку в функции выше и не дает запустить программу. Что делать? Сдавать уже надо.((( 0

@pupok5 0 / 0 / 0 Регистрация: 23.11.2010 Сообщений: 9
	05.12.2010, 18:38 [ТС]	5
	кот Бегемот, окей. А как график построить, не подскажите в нем же, после вычислений? 0

@Quiet Snow 5001 / 1673 / 409 Регистрация: 25.04.2010 Сообщений: 4,623 Записей в блоге: 2
	06.12.2010, 09:33	8
	Кстати, только что увидел что Шкап экспоненту вместо логарифма влепил... Shkap, ты если что-то плохо знаешь всегда можешь открыть поисковик пробить там термины и тебе всё на блюдечке с каёмочкой вылезет, не спеши, я сам когда спешу косячу жутко(КБ знает) Кстати говоря, программа по выводу уже была(даже в полярной системе координат), если б тогда Кот тему закрепил сейчас бы глупых вопросов/советов не было))), хотя не кодеры туда бы и заходить не стали, ну это не важно. но мне сказали, что вторым вариантом, тоже можно так вычислить. Того, кто тебе это сказал советую больше не слушать, первый раз ты верно написал. 0

@Quiet Snow 5001 / 1673 / 409 Регистрация: 25.04.2010 Сообщений: 4,623 Записей в блоге: 2
	06.12.2010, 13:21	10
	kazak, все это знают какбы, это внутреннее логическое преобразование осей... 0

@кот Бегемот Платежеспособный зверь 8926 / 4354 / 1642 Регистрация: 28.10.2009 Сообщений: 11,568
	06.12.2010, 13:26	11
	kazak, окно то ты сделаешь, но это ничего не изменит: оси всё равно надо переворачивать и увеличивать масштаб графика. 0

@Quiet Snow 5001 / 1673 / 409 Регистрация: 25.04.2010 Сообщений: 4,623 Записей в блоге: 2
	06.12.2010, 13:41	12
	оси всё равно надо переворачивать Если не ошибаюсь Window позволяет перевернуть оси, да и масштабирует не целочисленным способом(т.е. очень точно на FPU). Добавлено через 2 минуты Лично я предпочитаю способ когда экран остаётся экраном, уже привык к тому как организована видеопамять, а если оси поменяешь уже ничего нарисовать не удастся(менять оси по 100 раз не вариант). Метод КБ лучше да и модифицировать его под задачу удобнее. 0

@kazak 3528 / 2686 / 334 Регистрация: 11.03.2009 Сообщений: 6,168
	06.12.2010, 13:46	13
	Сообщение от >Quiet Snow< Лично я предпочитаю способ когда экран остаётся экраном, уже привык к тому как организована видеопамять, а если оси поменяешь уже ничего нарисовать не удастся(менять оси по 100 раз не вариант). Метод КБ лучше да и модифицировать его под задачу удобнее. Думаю это дело вкуса. 0

@Quiet Snow 5001 / 1673 / 409 Регистрация: 25.04.2010 Сообщений: 4,623 Записей в блоге: 2
	06.12.2010, 13:51	14
	Думаю это дело вкуса. Да я ничё не говорю, в хороших руках это отличный инструмент, позволяющий уменьшить код и сэкономить время. Просто когда нужна гибкость первый вариант предпочтительнее, хотя в контексте задачи принципиальной разницы нет. 0

Найти корни уравнения

Решение