Форум программистов, компьютерный форум CyberForum.ru

QBasic

Войти
Регистрация
Восстановить пароль
 
echs
891 / 1086 / 348
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
#1

Приближенная формула - QBasic

09.01.2017, 16:27. Просмотров 84. Ответов 0
Метки нет (Все метки)

Для суммы квадратов натуральных чисел есть
точная формула 1^2 + ... + n^2 = n(n+1)(2n-1)/6
Нам нужно вывести приближенную формулу для N <= 751
решение
Очевидно, что 0.333n^3 < Summa < 0.334n^3
если левая часть неравенства верна при любом n, то
правую часть должна проверить программа. Что она
и делает. Зная, что двойное неравенство верно, выведем
окончательную формулу
Summa = 0.3335n^3
погрешность равна 0.15%

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
REM
REM  1^2 + ... + n^2 = n(n+1)(2n-1)/6
REM
REM  .333 * n^3 < S < .334 * n^3
REM
REM      N = 751
REM
 
CLS
 
FOR N = 1 TO 751
   SUM = N * (N + 1) * (2 * N + 1) / 6
   S = .334 * N ^ 3
   IF SUM <= S THEN PRINT N;
NEXT
END
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.01.2017, 16:27     Приближенная формула
Посмотрите здесь:

Формула длины эллипса - QBasic
Эта программа написана специально для того, чтобы показать что на QBasic можно решать серьезные задачи. Сразу привожу готовый ответ ...

Существует ли какая-нибудь приближенная зависимость между массой метеорита и размером воронки - Астрономия
Меня интересует. Существует ли какая-нибудь приближенная зависимость между массой метеорита и размером воронки, которая образуется во время...

Привести формулу к виду КНФ(конъюктивно нормальная формула)или ДНФ(дизъюктивно нормальная формула) - Логика и множества
Не могу привести формулу к виду КНФ или ДНФ (то есть упростить)Хотелось бы с подробным решением и объяснением f=(x∧ylz)↓(x⊕(y→z))

формула на c++ - C++
Помогите перевести формулу.

формула 2 - Физика
По какой формуле вычисляется сила взаимодействие двух точенных зарядов в вакууме ?

Формула - MS Excel
Здравствуйте, есть таблица в которой выбраны минимальные по столбцам. Подскажите формулу для решения такой задачи: если элемент строки...

Формула - C++
как будет на языке си вот эта формула? аn=n!/(n+2)(n+1)

Формула - Delphi
Как правильно записать эту формулу в делфи???

Формула - Delphi
Добрый вечер,можете помоч с формулами?не понимаю как их составить для делфи y*(arctg(z)-\pi/6)/\left|x \right| +1/{y}^{2}+1 ...

Формула - Delphi
Стыдно, да( Но помогите написать данную функцию на делфи вот что пишу я: sqrt(x*x)+1/x*ln(x) ругается что не правильно


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru