 |
|
Модераторы: Akina |
 
|
|
QBasic, Разделение числа. 
| HerSystem |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 10 Регистрация: 3.6.2006 Репутация: нет Всего: нет |
Короче, дано двухзначное число, нам нужно сложить эти два числа. Например дано 25, надо сложить 2 и 5.
Впринципе я знаю как это сделать, но может у когонибудь есть другой вариант решениие поставленной задачи. Способ 1
Здесь a - первое число, b - второе число, ну а с - сумма. |
|||
|
||||
Загрузка ...
| Naghual |
|
|||
 Эксперт  Профиль Группа: Завсегдатай Сообщений: 1893 Регистрация: 15.5.2004 Где: Украина, Днепр Репутация: 26 Всего: 49 |
нормально решено.
можно еще через операции над строками, но будет дольше. Хотя на такой задаче и не увидиш этого -------------------- Я желаю всем Счастья! |
|||
|
||||
| Тутанхамец |
|
|||
 Опытный Профиль Группа: Участник Сообщений: 612 Регистрация: 10.10.2005 Где: в пирамидЕ! Репутация: 4 Всего: 6 |
Или вот так:
Хотя всё это один хрен.  |
|||
|
||||
| HerSystem |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 10 Регистрация: 3.6.2006 Репутация: нет Всего: нет |
Тутанхамец,
Спасибо. Интересное решение. Даже и не предпологал о таких вещах. Потом порылся в инете и нашёл инфу про эти операторы Среда Q Basic Это сообщение отредактировал(а) HerSystem - 22.10.2006, 19:16 |
|||
|
||||
| HerSystem |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 10 Регистрация: 3.6.2006 Репутация: нет Всего: нет |
А вот ещё задачка, только решения я уже незнаю.
Дано целое число, больше 99, надо найти третью с конца цифру. Дпоустим есть число 2945 искомая 9. |
|||
|
||||
| boevik |
|
|||
 Эксперт Профиль Группа: Участник Клуба Сообщений: 1452 Регистрация: 31.5.2004 Где: Израиль Репутация: 12 Всего: 35 |
Примерно так же как Тутанхамец, предлогал
-------------------- Никогда не говори никогда |
|||
|
||||
| Akina |
|
||||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
-------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
||||
|
|||||
| HerSystem |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 10 Регистрация: 3.6.2006 Репутация: нет Всего: нет |
Чёто я сразу не допёр, а второй код мне кажется не из этой серии
Народ а может кто знает из какой книжки мой препод читает эти задачки? |
|||
|
||||
| mihanik |
|
||||
 -=Белый Медведь=- Профиль Группа: Комодератор Сообщений: 4054 Регистрация: 24.4.2006 Где: г. Тверь Репутация: 11 Всего: 109 |
Akina!!!
В QBasic вместо Cstr() используется Str$(), вместо Mid используется Mid$() Поэтому твой код будет выглядеть так...
HerSystem, как раз из той оперы.!!! Akina сначала переводит число в текстовую строку, а потом из этой строки берёт третий справа символ... Логично! Но работа с текстовыми переменными делается дольше, чем с числовыми, поэтому, если у тебя прога большая, то попробуй решить всё на числах... -------------------- Программистами не рождаются, - это родовая травма...   |
||||
|
|||||
| Akina |
|
||||
|
Советчик Профиль Группа: Модератор Сообщений: 20581 Регистрация: 8.4.2004 Где: Зеленоград Репутация: 34 Всего: 454 |
Что да то да... плохо уже его помню...
Думаю, еще будут вопли по поводу неуказанных типов переменных - придется им хвосты накрутить, кому процентами, а кому и долларами...  -------------------- О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума. |
||||
|
|||||
|
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
[ Время генерации скрипта: 0.0501 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |