Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
3 / 3 / 0
Регистрация: 01.03.2017
Сообщений: 8

Исправить код

13.03.2017, 15:07. Показов 760. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ребята, помогите!
Как сделать так что бы значение y выводилось на экран целым числом без буквы е?

QBasic/QuickBASIC
1
2
3
4
5
REM Lineinyi process
INPUT "x="; x
LET y=2.05*10^x+2.5*x-6.5
PRINT "y="; y
END
Миниатюры
Исправить код  
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.03.2017, 15:07
Ответы с готовыми решениями:

Исправить код лабиринта
DO K$ = INKEY$ IF K$ = "K" THEN GOSUB LABIRINT LOOP LABIRINT: OPEN "WWW.BAS" FOR APPEND AS #1 PRINT #1, "A = INT(RND(1)*2)" ...

Интерактивная программа, исправить код
посмотрите что не правильно. 10 CLS 20 LOCATE 5, 30: PRINT "hello my name vova,a kak zovyt teba?" 30 INPUT n$ 40 PRINT ...

Исправить код вычисления значения функции
Подскажите пожалуйста, что делаю не так? CLS x1=2.2 x2=3.2 s=0.1 x=x1 40 y=SQR(2+SQR(1.25+x))-1.5*x+2.5 PRINT "x=";...

9
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
13.03.2017, 16:10
Так пойдет?

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
CLS
 
DIM S AS STRING
DIM T AS STRING
DIM s1 AS STRING
DIM s2 AS STRING
DIM s3 AS STRING
 
INPUT "X = "; x
y = 2.05 * 10 ^ x + 2.5 * x - 6.5
 
S = LTRIM$(STR$(y))
 
IF LEN(S) >= 12 THEN
   k = INSTR(S, ".")
   s1 = LEFT$(S, k - 1)
   s2 = MID$(S, k + 1, LEN(S) - LEN(s1) - 5)
   s3 = RIGHT$(S, 2)
 
   n = VAL(s3) - LEN(s1 + s2) + 1
   T = s1 + s2 + STRING$(n, "0")
 
   PRINT "Y = "; T
ELSE
   PRINT "Y ="; y
END IF
END
0
3 / 3 / 0
Регистрация: 01.03.2017
Сообщений: 8
13.03.2017, 16:22  [ТС]
Не знаю, наверное пойдет.
У меня просто три варианта задания, два из них без проблем прошли, а в третьем значения функции большие очень получаются.

Добавлено через 3 минуты
Задание составит программу, которая по введенным значениям переменной х = 1,2,5,7,9,12 вычисляет и печатает значение функции
при х=9 опять буква е выходит((
1
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
13.03.2017, 16:31
Irina1977
Вообще то принято выводить результат в
показательной форме с плавающей десятичной точкой
(с буквой е). А без нее число может быть очень длинным.
1
3 / 3 / 0
Регистрация: 01.03.2017
Сообщений: 8
13.03.2017, 16:33  [ТС]
т.е. замечания не будет то что присутствует е?
Я так понимаю е показывает 10 в степени, т.е сокращает число?
1
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
13.03.2017, 16:36
Irina1977
Да. Вы всё правильно поняли. Никаких замечаний
быть не должно!!
1
3 / 3 / 0
Регистрация: 01.03.2017
Сообщений: 8
13.03.2017, 16:38  [ТС]
Спасибо большое за вашу помощь))
1
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
13.03.2017, 16:40
Irina1977
Помог как другу. Просто другу!!
1
140 / 130 / 127
Регистрация: 27.09.2012
Сообщений: 641
15.03.2017, 17:10
Можно и так)
PureBasic
1
2
3
4
5
6
REM Lineinyi process
CLS
INPUT "x="; x
LET y = 2.05 * 10 ^ x + 2.5 * x - 6.5
PRINT using "y= ###.###############"; y
END
0
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
15.03.2017, 17:54
urbic
Да. Так тоже можно делать. Только дело в том,
что в программе числа большие и строку 5 следует
записать например так

QBasic/QuickBASIC
1
PRINT USING "y= ###############.###"; y
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
15.03.2017, 17:54
Помогаю со студенческими работами здесь

Исправить код (Выход за границы массива)
У меня есть код, с таким замечанием: Мин.индекс в Basic 0, поэтому ошибка (выход за границы массива). Помогите исправить! CLS ...

Исправить код определения типа треугольника
Разработайте программу, которая вводит длины трёх сторон треугольника и определяет его тип по двум параметрам:...

Построить графики функций, исправить код
Задание х нач х кон шаг функция -10 10 0.01 1) 20*X^2+(30*X-180) 1 10 ...

Печать символа "В" на матричном принтере, исправить код
1000 LРRINT CHR$(27); "xl"; 1010 LРRINT CHR$(27); "&"; CHR$(0); CHR$(31); CHR$(31); 1020 RESTОRE 1540 1030 FОR N=31 TО 31 1040 READ...

Сортировка методом выбора и методом "пузырька"; исправить код
Задание, блок-схема и место ошибки на фотографии(вложение). А вот сам код: CLS TYPE AVTO dmarka AS STRING * 25 dnomer AS...


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru