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

Перевести массу из одной единицы измерения в другую - VB

06.12.2012, 22:30. Просмотров 1210. Ответов 3
Метки нет (Все метки)

Единицы массы пронумерованы следующим образом: 1 – килограмм, 2 – миллиграмм, 3 – грамм, 4 – тонна, 5 – центнер. Дан номер единицы массы N (целое число в диапазоне 1–5) и масса тела в этих единицах M. Найдите массу тела в единицах массы с номером K.

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

Как перевести число из одной системы счисления в другую.
Добрый день! Помогите пожалуйста, нужно создать программку: TextBox1.Text -...

Перевод из одной сс в другую
Боже мой.помогите мне пожалуйста кто-нибудь!:gcray2: мне нужно на vb написать...

Перевод числа из одной СС в другую
Если кому не лень можете помочь с переводом единиц из одной СС в другую?...

Перевод из одной кодировки в другую
Возможно ли это реализовать в программном коде Visual Basic 6? Если да, то как?

Вносить данные с одной формы в другую.
Вобщем така проблема Существует одна форма для просмотра записей в БД Надо...

Передача массива с одной формы в другую
Здравствуйте, а не подскажете как передать массив данных из одной формы VB в...

3
Казанский
13891 / 5654 / 1441
Регистрация: 24.09.2011
Сообщений: 8,863
06.12.2012, 23:18 #2
Цитата Сообщение от Ukranian_fan Посмотреть сообщение
Напишите пожалуйста простенькую программу без функций
Давайте наоборот я дам простенькую функцию, а Вы допишете интерфейс
Visual Basic
1
2
3
4
5
6
Function UnitTranslator(N&, M#, K&) As Double
Dim units()
'1 – килограмм, 2 – миллиграмм, 3 – грамм, 4 – тонна, 5 – центнер
units() = Array(Null, 0, -6, -3, 3, 2) 'степени 10-ки относительно 1 кг
UnitTranslator = M * 10 ^ (units(N) - units(K))
End Function
Тест в окне Immediate
Visual Basic
1
2
3
4
?UnitTranslator(1,1,2) '1кг в мг
 1000000 
?UnitTranslator(5,1,4) '1ц в т
 0,1
0
Ukranian_fan
0 / 0 / 0
Регистрация: 02.12.2012
Сообщений: 13
06.12.2012, 23:21  [ТС] #3
Казанский, вы понимаете я не разбираюсь в функциях. Мне нужна программа без функций. Прошу вас переделайте.
0
Казанский
13891 / 5654 / 1441
Регистрация: 24.09.2011
Сообщений: 8,863
06.12.2012, 23:32 #4
Цитата Сообщение от Ukranian_fan Посмотреть сообщение
вы понимаете я не разбираюсь в функциях
Печально. А мне эта тема больше неинтересна.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
06.12.2012, 23:32
Привет! Вот еще темы с решениями:

Можно ли скопировать содержание одной формы на другую?
Скажите кто знает, можно ли копировать содержимое Formы т.е...

Как передать данные из одной формы в другую?
Осваиваю Visual Basic 6.0. У меня есть форма, в которой в элементе управления...

Как передавать параметры с одной программы в другую?
Как передавать параметры от одной моей программы к другой?

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


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

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

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