Форум программистов, компьютерный форум, киберфорум
Наши страницы

Visual Basic

Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 32, средняя оценка - 4.91
akira_akai
17 / 3 / 1
Регистрация: 14.12.2010
Сообщений: 77
#1

Вывод целой и десятичной части дробного числа - VB

06.10.2011, 00:17. Просмотров 4262. Ответов 20
Метки нет (Все метки)

Вечера, уважаемые программисты. Возникла потребность в программе, которая бы при вводе не целого числа выводила отдельно целую часть и десятичную(то есть число после комы0.
Как это осуществить?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.10.2011, 00:17
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вывод целой и десятичной части дробного числа (VB):

Разделитель целой и дробной части числа .... - Visual Basic
Привет. Подскажите, можно ли узнать с помощью какой-нибудь функции, какой разделитель целой и дробной части числа используется сейчас в...

Разделение целой и дробной части в TextBox - Visual Basic
Здравствуйте. У меня есть три текстбокса, в одном из них выводится произведение дробных чисел, введённых в два других текстбокса. Я...

Как из макроса в Eхcel поменять разделитель целой и дробной части с ',' на '.' ? - Visual Basic
Kak is Makrosa v EXcele pomenjat' rasdelitel' celoj i drobnoj 4asti s ',' na '.'?

Превод числа из десятичной в к-ичную - Visual Basic
даны два числа а-число в деcятичной k-система в которую нужно перевести Составить программу перевода числа в k-ичную систему. ...

Получение целой и дробной части для десятичной дроби - C++
Привет всем. Ищу ответа на достаточно простую задачу: человек вводит число в виде десятичной дроби, с которым в дальнейшем нужно...

Перевод дробного числа из десятичной системы в двоичную - PascalABC.NET
Здравствуйте, наткнулся на такую задачу:scratch:, нужно перевести десятичное число в двоичную систему, вот подробнее... "Дано...

20
akira_akai
17 / 3 / 1
Регистрация: 14.12.2010
Сообщений: 77
06.10.2011, 01:50  [ТС] #16
Цитата Сообщение от Alex77755 Посмотреть сообщение
Мы должны догадаться, что иеется в виду сумма кубов цифр его состаляющих?
- я позже указал об этом.

Добавлено через 29 секунд
Цитата Сообщение от Alex77755 Посмотреть сообщение
Слава богу, что хоть на второй странице догадался озвучить ещё кусочек условия!!
На пятой странице сможем узнать условие полностью!
- полностью я его озвучил.
0
Alex77755
10686 / 3261 / 538
Регистрация: 13.02.2009
Сообщений: 9,619
06.10.2011, 01:55 #17
есть натуральное число кратное трем.
Где оно есть?
В природе? В файле? Надо ввести с клавиатуры?
0
akira_akai
17 / 3 / 1
Регистрация: 14.12.2010
Сообщений: 77
06.10.2011, 01:58  [ТС] #18
Цитата Сообщение от Alex77755 Посмотреть сообщение
Где оно есть?
В природе? В файле? Надо ввести с клавиатуры?
- да, оно вводиться из клавиатуры.

Добавлено через 2 минуты
Цитата Сообщение от gaw Посмотреть сообщение
3 берем число и делим его на 10 --- остаток даст последнюю цифру
потом число нацело делим на 10 --- получим уже как бы без последней цифры
- это немного не понял. остаток от деления? и какое число потом нацело делить на 10?
0
Alex77755
10686 / 3261 / 538
Регистрация: 13.02.2009
Сообщений: 9,619
06.10.2011, 02:02 #19
Оно должно вводиться в текстовое поле или в InputBox?
Ты видишь сколько необходимо задать наводящих вопросов по примитивной задаче?
И никто не отменял поиск по сайту(или тебя забанили в поисковике?
Буквально вчера или позавчера была тема о количестве цифр в числе!
0
akira_akai
17 / 3 / 1
Регистрация: 14.12.2010
Сообщений: 77
06.10.2011, 02:03  [ТС] #20
Цитата Сообщение от Alex77755 Посмотреть сообщение
Оно должно вводиться в текстовое поле или в InputBox?
Ты видишь сколько необходимо задать наводящих вопросов по примитивной задаче?
И никто не отменял поиск по сайту(или тебя забанили в поисковике?
Буквально вчера или позавчера была тема о количестве цифр в числе!
текстовое поле.
ну извините, не знал.
видел эту тему. не совсем об этом она.
0
gaw
6632 / 1499 / 152
Регистрация: 09.01.2010
Сообщений: 4,272
06.10.2011, 02:12 #21
пробуй
Visual Basic
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
Private Sub Command1_Click()
Dim k As Integer
k = InputBox("n-?")
If IsNumeric(k) Then
   If k Mod 3 = 0 Then
   Cls
     Print "для k="; k; "   S3=" & S_k(k)
     Print "для k="; S_k(k); "   S3=" & S_k(S_k(k))
   Else
      MsgBox "не кратное 3"
   End If
Else
  MsgBox "введено не число"
End If
End Sub
Function S_k(n As Integer) As Long
Dim n1 As Integer
n1 = n
S_k = 0
Do While n1 > 0
m = n1 Mod 10
S_k = S_k + m ^ 3
n1 = n1 \ 10
Loop
End Function
Добавлено через 5 минут
Цитата Сообщение от akira_akai Посмотреть сообщение
- это немного не понял. остаток от деления? и какое число потом нацело делить на 10?
S=0
15
15/10 остаток --- 5
S=S+5^3
15\10 деление нацело --- 1
S=S+1^3
0
06.10.2011, 02:12
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
06.10.2011, 02:12
Привет! Вот еще темы с ответами:

Даны 2 натуральных числа M и N.Вывести старшую цифру дробной части и младшую цифру целой части числа M/N - VBA
Помогите пожалуйста написать программки в VBA: 1)Даны натуральные числа М и N. Вывести старшую цифру дробной части и младшую цифру...

Даны натуральные числа М и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N - Pascal
Даны натуральные числа М и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N.Pascal

Вывод дробной и целой части - C++
Вывод дробной и целой части. Вводим число с = 1,5 ; Выводит целое: а = ; и дробное: в = ;

Вывод целой и дробной части - C++
"Вводятся числитель и знаменатель дроби. Вывести: знак, целую часть, сокращенные числитель и знаменатель." со знаком разобрался,а вот...


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

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

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