IPB

Здравствуйте, гость ( Вход | Регистрация )

> Проги на Qbasic
kaz14
сообщение 13.6.2007, 20:39
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 3
Регистрация: 13.6.2007
Город: NOVOCHERKASSK
Учебное заведение: NPI
Вы: студент



Добрый день уважаемые форумчане.
Передо мной стоит задача решить интеграл (1/(4+x^2)) методом трапеций.
Я попробывал и вот что получилось

Print “Nujno vvesti a,b,n,e”
Print “Vvedite a ” ;
Input a
Print “Vvedite b ” ;
Input b
Print “Vvedite n ” ;
Input n
Print “Vvedite e ” ;
Input e
h=(b-a)/n
Do
s=0
x=a
Do
s=s+((1/(4+x^2))+(1/(4+(x+h)^2)))·h/2
x =x+h
Loop While x<=b
h=h/2
s2=0
x=a
Do
s2=s2+((1/(4+x^2))+(1/(4+(x+h)^2)))·h/2
x=x+h
Loop While x<b
Loop While ABS|s-s2|>e
PRINT “Otvet” ; s2
END

Если найдёте ошибку пжлста срочно о ней сообщите! (IMG:style_emoticons/default/rolleyes.gif)

Срочно?! Может быть вы сначала подумаете еще раз над тем, что просите. А потом уже задачу Вашу обсуждать будем.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
Ответить в эту темуОткрыть новую тему
Ответов
kaz14
сообщение 13.6.2007, 21:25
Сообщение #2


Новичок
*

Группа: Пользователи
Сообщений: 3
Регистрация: 13.6.2007
Город: NOVOCHERKASSK
Учебное заведение: NPI
Вы: студент



Посидел подумал про двумерный массив и вот что пришло в голову

S=0
FOR I=1 TO N
FOR J=1 TO M
S=S+A(I.J)
NEXT J
NEXT I

Как вы думаете?Правильно?

Цитата
Я уж думал на QBasic ни кто не пишет. Это вроде как письмена острова Пасхи


Уважаемый,Ботаник,Вы жестоко ошибаетесь.Даже в институтах продолжают преподавать.Правда какой толк от него я не знаю.

А на счёт времени,дык это само сабой у кого есть время и желание тот и ответит.У кого нету тот и не ответит.Простая логика (IMG:style_emoticons/default/cool.gif) (IMG:style_emoticons/default/biggrin.gif)
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Сообщений в этой теме


Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия Сейчас: 25.5.2025, 21:15

Книжки в помощь: "Сборник заданий по высшей математике" Кузнецов Л.А., "Сборник заданий по высшей математике" Чудесенко В.Ф., "Индивидуальные задания по высшей математике" Рябушко А.П., и другие.




Зеркало сайта Решебник.Ру - reshebnik.org.ru