Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Заблокирован
1

Осторожно, оператор SINGLE !

16.06.2014, 16:44. Показов 1075. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Чем так опасен оператор SINGLE, что для него потребовалось
создать специальную тему. Внизу приведена программа
для решения уравнения SQR(x)+ SQR(x+1) + ... +SQR(x+n)=n^2
Если в этой программе закомментировать третью строку, то
все переменные объявленные как тип DOUBLE станут по умолчанию
типом SINGLE. И теперь программа не будет работать начиная с n>12
Почему??
Коварство SINGLE заключается в Малой Точности (7 знаков)!!
А погрешность - 5-ый знак после запятой! А что будет если число
будет трехзначным?? Ничего! Программа просто зависнет!! Бейсик
будет молчать, а кто-то ломать голову - "Ну почему он не работает?!"
Так что если ваша программа показывает характер, вспомните SINGLE !!!
Ведь он задается ПО УМОЛЧАНИЮ !! Вы поняли - "В тихом омуте ....!!"
(программа проверена)
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
REM SQR(x) + SQR(x+1) + ... + SQR(x+n) = n^2
DEFINT I, N
DEFDBL A-C, F, X-Y
 
DEF fnf (x, n)
   f = n ^ 2
   FOR i = 0 TO n
      f = f - SQR(x + i)
   NEXT i
   fnf = f
END DEF
CLS
INPUT "Vvedite N"; n
 
e = .00001
a = 0
b = n ^ 2
 
DO
   c = (a + b) / 2                    
   y = fnf(c, n)
   y1 = fnf(a, n)
   IF y1 * y <= 0 THEN b = c ELSE a = c  
LOOP UNTIL ABS(a - b) < e
                                
PRINT " x = "; c
END
Удачи вам!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.06.2014, 16:44
Ответы с готовыми решениями:

Осторожно, оператор Circle!
Я тут решал одну задачу, где требовалось построить несколько окружностей. Задача не бог весть...

Формат single IBM float point преобразование в Csharp Single(float) формат
Возникла проблема с чтением данных в формате IBM float point. Пытался найти какой-либо простой...

ОСТОРОЖНО КИДАЛОВО!!!
Информация для всех: На этом форуме есть гражданин под ником Ignat, так вот этот человек кидает...

Осторожно! Апгрейд!
Всем добрый день. Я занимаюсь монтажем видео фулл Хд в sony vegas много лет уже и такое ощущение...

4
5001 / 1673 / 409
Регистрация: 25.04.2010
Сообщений: 4,624
Записей в блоге: 2
16.06.2014, 19:38 2
Вы поняли - "В тихом омуте ....!!"
Всё в справке есть. Просто когда в омуте лосось, то всё именно так и никак не иначе...
2
1045 / 315 / 74
Регистрация: 13.07.2013
Сообщений: 1,270
16.06.2014, 19:41 3
Цитата Сообщение от gehh Посмотреть сообщение
опасен оператор SINGLE
gehh, что есть оператор SINGLE? QBasic такого не знает:
Осторожно, оператор SINGLE !
1
Заблокирован
16.06.2014, 21:00  [ТС] 4
Я полагаю, что мы не будем уточнять смысл термина
SINGLE. Я называю его оператором, но почему не назвать
Ведь операторы бывают разные. Этот определяет тип
переменной. Но спасибо Вам ещё раз! Я постараюсь
запомнить этот урок. Спасибо!
0
5001 / 1673 / 409
Регистрация: 25.04.2010
Сообщений: 4,624
Записей в блоге: 2
17.06.2014, 17:00 5
но почему не назвать
Потому что в ЯП это ключевое слово характеризующее тип данных и никак не оператор.
Не стоит сбивать с толку других людей и намеренно вводить их в заблуждение.
И ещё не стоит тыкать на "лучший ответ", в данной, заведомо туповато-бредоватой теме.
1
17.06.2014, 17:00
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.06.2014, 17:00
Помогаю со студенческими работами здесь

Осторожно, мина!
Повторяется история с симулятором от Keilа для STM32F100. Точнее, с отсутствием такового. После...

Осторожно вирусы!
Кто еще не в курсе, тот может почитать вот эти две темы: http://**************/topic25547.html ...

осторожно тонер
Всем здрям :) я тут решил на работе почистить пол в заправочной и такой вопрос как омыть от...

Осторожно, AVG PC TuneUP!
Предлагается этим дополнением к основному антивируснику AVG много чего. И очистка диска и...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru