Определить сумму цифр числа и напечатать число, составленное из цифр заданного в обратном порядке

@верусик · Регистрация: 10.04.2011

Author24 — интернет-сервис помощи студентам

Помогите,пожалуйста!Вообще не врубаюсь в решение задания.Какой код написать?
Вот задание: в числовую переменную ввести натуральное число больше 1000, но меньше 32000. Определить сумму цифр этого числа и напечатать число, составленное из цифр заданного в обратном порядке.
Помогииите...

@Shkap · 23.04.2011, 19:05

эх *** ща мне за тэги дадут пред или бан ну да лан

Visual Basic

private sub trololo
Randomize Timer
a = Int(Rnd(1) * 31000) + 1001
Form1.Print a
k = a
Do While a / 10 <> 0
s = a Mod 10 + s
a = a \ 10
Loop
Form1.Print s
end sub

@YuraAAA · 23.04.2011, 19:11

Visual Basic

Private Sub Command1_Click()
Dim X, txt As String, sum As Single
X = Int(Val(InputBox("X:")))
If X < 1000 And X > 32000 Then MsgBox ("Error!"): Exit Sub
X = CStr(X)
For i = 1 To Len(X)
    sum = sum + Mid(X, i, 1)
    txt = txt & Mid(X, Len(X) - i + 1, 1)
Next i
MsgBox "Sum = " & sum & Chr(13) & "Numb = " & txt
End Sub

@Shkap · 23.04.2011, 19:55

YuraAAA, задача скорее для qbasic'а, там как раз такие задачи (в смысле на подлянку с числами, хотя не такая уж это и подлянка), но использовать числовую переменную как текст - плохой тон. хотя твой пост несомненно прав, некоторые преподы ставят за это неуд.
Работа с текстом показывает неумение работать с числами (с) кот Бегемот

Добавлено через 1 минуту
з.ы. про числовые задачки знаю тока о бейсике, прошу прощенья что другие не указал, хотя такие задачи часто встречаются на начальных средах васика паскаля

Добавлено через 6 минут
з.з.ы. ух ты это кахдйто я плюсанул пост ТС?0_о

@YuraAAA · 23.04.2011, 19:59

Shkap, вопрос был задан в разделе Visual Basic, требования решить задачу только с помощью математических действий не было

@Shkap · 24.04.2011, 08:29

YuraAAA, согласен, но как то это не ... что-то в этом нето

@Alex77755 · 24.04.2011, 10:00

Shkap,

использовать числовую переменную как текст - плохой тон

Кто тебе такое сказал? Или попроси у него ссылку на МУДСНЫ или смело посылай.
Это сугубо его личное мнение и не больше

@верусик · 04.05.2011, 23:03 **[ТС]**

Спасибо большущеееее))Всё заработало) ВЫ

спасители)))

@Shkap · 06.05.2011, 17:40

Сообщение от Alex77755

Shkap,

Кто тебе такое сказал? Или попроси у него ссылку на МУДСНЫ или смело посылай.
Это сугубо его личное мнение и не больше

Я же написал (с) Кот Бегемот

Новые блоги и статьи
Всё не так уж и плохо. Hrethgir 25.01.2025 Запустил более-менее сносно регистры в связке с сумматорами. Да - виновата оптимизация от Gowin EDA, дело в том, что Education шифрует нетлист, да и вообще много чего не позволяет. Просто обвязал. . .	Cisco ASA: подробное руководство по настройке и использованию hw_wired 25.01.2025 В сетевой безопасности межсетевые экраны играют критически важную роль в защите корпоративных инфраструктур от постоянно растущего числа киберугроз. Среди множества решений для обеспечения. . .	Cisco Intelligent Services Gateway: руководство по настройке hw_wired 25.01.2025 В сетевых инфраструктурах Cisco Intelligent Services Gateway (ISG) играет ключевую роль в организации и управлении сервисами для конечных пользователей. Этот компонент представляет собой. . .	Использование Go (Golang) в Highload-проектах: преимущества и особенности bytestream 25.01.2025 В мире высоконагруженных систем выбор правильного инструментария играет ключевую роль в успехе проекта. Go (Golang) представляет собой относительно молодой язык программирования, который быстро. . .	Откуда у float лишние цифры в конце дробной части. Представление чисел с плавающей точкой bytestream 25.01.2025 При разработке программного обеспечения часто возникает необходимость работать с вещественными числами, которые содержат дробную часть. В современных компьютерных системах такие числа представляются. . .	Как использовать глобальную переменную в функции в Python bytestream 25.01.2025 В программировании на Python глобальные переменные представляют собой особый тип переменных, которые доступны для использования во всех частях программы, включая различные функции, классы и модули. . . .
Как в цикле обойти все элементы map в Java bytestream 25.01.2025 В разработке на Java одной из наиболее востребованных структур данных является интерфейс Map, который предоставляет эффективный способ хранения и управления парами "ключ-значение". Разработчики. . .	Для чего нужен UserManager.isUserAGoat() в Android и как это использовать bytestream 25.01.2025 В мире Android-разработки существует множество интересных и порой загадочных функций, о которых знают далеко не все разработчики. Одной из таких функций является метод UserManager. isUserAGoat(),. . .	Как обойти масси в JavaScript. Всё о циклах bytestream 25.01.2025 JavaScript представляет собой мощный язык программирования, широко используемый в веб-разработке, где массивы и циклы являются фундаментальными концепциями для эффективной работы с данными. Массив в. . .	Как сделать, чтобы существующая ветка отслеживала удалённую в Git. Связывание локальных и удалённых веток bytestream 25.01.2025 В разработке программного обеспечения системы контроля версий стали неотъемлемой частью процесса создания качественного программного продукта. Эти инструменты позволяют разработчикам эффективно. . .	Как проверить, что файл НЕ существует с помощью Bash bytestream 25.01.2025 В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .	Как проверить, что строка пустая, неопределена или null в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .

@верусик 1 / 1 / 0 Регистрация: 10.04.2011 Сообщений: 8
		1
	Определить сумму цифр числа и напечатать число, составленное из цифр заданного в обратном порядке 23.04.2011, 18:22. Показов 1974. Ответов 8 Метки нет (Все метки) Помогите,пожалуйста!Вообще не врубаюсь в решение задания.Какой код написать? Вот задание: в числовую переменную ввести натуральное число больше 1000, но меньше 32000. Определить сумму цифр этого числа и напечатать число, составленное из цифр заданного в обратном порядке. Помогииите... 1

@Shkap Оранжевый портфель. 60 / 58 / 47 Регистрация: 13.11.2010 Сообщений: 459
	23.04.2011, 19:55	4
	YuraAAA, задача скорее для qbasic'а, там как раз такие задачи (в смысле на подлянку с числами, хотя не такая уж это и подлянка), но использовать числовую переменную как текст - плохой тон. хотя твой пост несомненно прав, некоторые преподы ставят за это неуд. Работа с текстом показывает неумение работать с числами (с) кот Бегемот Добавлено через 1 минуту з.ы. про числовые задачки знаю тока о бейсике, прошу прощенья что другие не указал, хотя такие задачи часто встречаются на начальных средах васика паскаля Добавлено через 6 минут з.з.ы. ух ты это кахдйто я плюсанул пост ТС?0_о 1

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	23.04.2011, 19:59	5
	Shkap, вопрос был задан в разделе Visual Basic, требования решить задачу только с помощью математических действий не было 1

@Shkap Оранжевый портфель. 60 / 58 / 47 Регистрация: 13.11.2010 Сообщений: 459
	24.04.2011, 08:29	6
	YuraAAA, согласен, но как то это не ... что-то в этом нето 1

@Alex77755 11517 / 3803 / 681 Регистрация: 13.02.2009 Сообщений: 11,223
	24.04.2011, 10:00	7
	Shkap, использовать числовую переменную как текст - плохой тон Кто тебе такое сказал? Или попроси у него ссылку на МУДСНЫ или смело посылай. Это сугубо его личное мнение и не больше 1

@верусик 1 / 1 / 0 Регистрация: 10.04.2011 Сообщений: 8
	04.05.2011, 23:03 [ТС]	8
	Спасибо большущеееее))Всё заработало) ВЫ спасители))) 0

@Shkap Оранжевый портфель. 60 / 58 / 47 Регистрация: 13.11.2010 Сообщений: 459
	06.05.2011, 17:40	9
	Сообщение от Alex77755 Shkap, Кто тебе такое сказал? Или попроси у него ссылку на МУДСНЫ или смело посылай. Это сугубо его личное мнение и не больше Я же написал (с) Кот Бегемот 0