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

Написать программу сложения и умножения восьмеричных чисел с плавающей запятой

22.05.2016, 14:23. Просмотров 904. Ответов 1
Метки нет (Все метки)

Написать программу сложения и умножения восьмеричных чисел с плавающей запятой. Исходные числа и результат должны иметь следующую форму:"0.nnnnn*8^mmm". (исходные данные вводятся с клавиатуры). Free basic
ПЛИИИИЗ
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.05.2016, 14:23
Ответы с готовыми решениями:

Написать программу алгебраического сложения десятичных чисел с плавающей запятой
Нужно написать программу алгебраического сложения десятичных чисел с плавающей запятой. Исходные...

Написать программу умножения и деления десятичный чисел с плавающей запятой
Помогите пожалуйста написать программу умножения и деления десятичный чисел с плавающей запятой....

Написать программу умножения и деления десятичных чисел с плавующей запятой
Сама задачка: Написать программу умножения и деления десятичных чисел с плавающей запятой.Исходные...

Написать программу для сложения, вычитания, умножения и вычисления определителя трёхмерной матрицы.
Задача на сложение матриц REM Моделир.сложных трёхмерных (2 строки * 3 столбца* * 2 слоя) матриц...

Написать программу умножения и деления десятичных чисел с плавающей запятой
Помогите пожалуйста написать программу умножения и деления десятичный чисел с плавающей запятой....

1
echs
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
22.05.2016, 16:53 2
Лучший ответ Сообщение было отмечено fresh19 как решение

Решение

Я попробовал на qbasic.
Задача слишком сложная. Мне не решить.
Вот начало кода...

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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
DECLARE FUNCTION M! (k!)
DECLARE FUNCTION N! (k!)
DECLARE FUNCTION SSTR$ (k!)
CLS
DIM a AS STRING
DIM b AS STRING
DIM c AS STRING
DIM SHARED am AS STRING
DIM SHARED bm AS STRING
DIM am2 AS STRING
DIM bm2 AS STRING
 
a = "0.17324*8^+03"
b = "0.17324*8^+00"
c = "*8^"
 
am = LEFT$(a, 7)
bm = LEFT$(b, 7)
am2 = "0."
bm2 = "0."
 
pa = VAL(MID$(a, 11))
pb = VAL(MID$(b, 11))
ab = pa - pb
 
IF ab > 0 THEN
   FOR i = 1 TO ab
      bm2 = bm2 + "0"
   NEXT i
   FOR i = 3 TO 7 - ab
      bm2 = bm2 + MID$(bm, i, 1)
   NEXT i
   bm = bm2
ELSEIF ab < 0 THEN
   FOR i = 1 TO -ab
      am2 = am2 + "0"
   NEXT i
   FOR i = 3 TO 7 + ab
      am2 = am2 + MID$(am, i, 1)
   NEXT i
   am = am2
END IF
 
FOR i = 7 TO 3 STEP -1
   k = M(i) + N(i) + k1
   IF k >= 8 THEN
      k = k - 8
      k1 = 1
      c = SSTR(k) + c
   ELSE
      k1 = 0
      c = SSTR(k) + c
   END IF
NEXT i
 
IF k1 THEN
 
ELSE
  
   c = "0." + c
END IF
PRINT am, bm, c
END
 
 
FUNCTION M (k)
   M = VAL(MID$(am, k, 1))
END FUNCTION
 
FUNCTION N (k)
   N = VAL(MID$(bm, k, 1))
END FUNCTION
 
FUNCTION SSTR$ (k)
   SSTR = LTRIM$(STR$(k))
END FUNCTION
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.05.2016, 16:53

Составить программу умножения чисел с плавающей запятой.
Составить программу умножения чисел с плавающей запятой. Программа должна иметь диалоговый...

Выполнить операцию сложения чисел с плавающей запятой
выполнить операцию сложения чисел с плавающей запятой A1=112,12(10) A2=-21,10(10)

Выполнить операцию сложения чисел с плавающей запятой
возможно я пишу не в ту тему, но помогите если кто знает выполнить операцию сложения чисел с...


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

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

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