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

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

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

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

@Shkap · 23.04.2011, 19:05

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

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
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
1
2
3
4
5
6
7
8
9
10
11
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,

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

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

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Киев стоит - украинская песня zorxor 28.01.2026 wfWdiRqdTxc О Господи, Вечный, Ты . . . Я помоги, Бесконечный. . . Я прошу Ты. . . Я погибаю, спаси. . . Я прошу Тебя Вечный. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .

@верусик 1 / 1 / 0 Регистрация: 10.04.2011 Сообщений: 8

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

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

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

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

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