Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
ZooMBR
0 / 0 / 1
Регистрация: 05.01.2012
Сообщений: 1
#1

Калькулятор на QBasic: как быть с делением на ноль - QBasic

08.01.2012, 21:57. Просмотров 930. Ответов 1
Метки нет (Все метки)

Помогите с дилением на ноль. Моё первое обучение
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
CLS
INPUT "Enter first value: ", c1
m1: INPUT "Enter operation(+,-,*,/) ", c2$
IF NOT ((c2$ = "+") OR (c2$ = "-") OR (c2$ = "*") OR (c2$ = "/")) THEN GOTO m1
INPUT "Enter second value ", c3
 
IF c2$ = "+" THEN c4 = c1 + c3
IF c2$ = "/" THEN c4 = c1 / c3
IF c2$ = "*" THEN c4 = c1 * c3
IF c2$ = "-" THEN c4 = c1 - c3
 
PRINT c4
Kaкое можно было бы сделать решение? на примере
IF c3 <> 0 THEN c4 = c1 / c3
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.01.2012, 21:57
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Калькулятор на QBasic: как быть с делением на ноль (QBasic):

просьба исправить ошибку с делением на ноль
program z_2; uses crt; var y,z,f,x,pi,a,b,c:real; function o(x:real):real;...

Метод Гаусса, косяк с делением на ноль на этапе приведения к треугольному виду
Собственно проблема описана в заголовке. Программа загружает текстовый файл, в...

Калькулятор и деление на ноль
Нужно чтобы при делении на ноль выскакивала ошибка.Помогитееее

Мини калькулятор или деление на ноль
Привет форумчани. Написал я программу что-то на подобия калькулятора который...

Калькулятор, обработка попытки деления на ноль
Написал прогу в pascalabc.net у него по стандарт. вычислению 9/0=бесконечность,...

Обработка ошибки деления на ноль (калькулятор)
ASP.NET в среде Visual Studio.NET Написала проверку корректности вводимых...

1
softmob
1249 / 699 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
08.01.2012, 22:16 #2
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
CLS
DO
    INPUT "Enter first value: ", c1
    INPUT "Enter operation(+,-,*,/): ", c2$
    INPUT "Enter second value: ", c3
LOOP UNTIL INSTR("+-*/", MID$(c2$, 1, 1))
IF c2$ = "+" THEN c4 = c1 + c3
IF c2$ = "/" THEN
    IF c3 <> 0 THEN c4 = c1 / c3 ELSE PRINT "division by zero": END
END IF
IF c2$ = "*" THEN c4 = c1 * c3
IF c2$ = "-" THEN c4 = c1 - c3
 
PRINT c4
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.01.2012, 22:16
Привет! Вот еще темы с решениями:

Калькулятор - при изменении значения выдает ноль
Пытаюсь добавить новое значение if (content.value &gt;0) price_content=...

Как сделать ноль результатом деления на ноль?
Народ, подскажите пожалуйста как сделать, чтоб при делении на ноль результат...

Какие могут быть последствия, если ноль взят от отопительной батареи?
Потерян на розетке ноль и вместо того, чтобы тянуть новый ноль и я его сделаю...

Калькулятор: Сообщение что на ноль делить нельзя должно выводится на русском языке
Сообщение что на ноль делить нельзя должно выводится на русском языке))...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

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