Как удалить из числа первую и последнюю цифру?

@Polls · Регистрация: 09.02.2014

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

@Good-Morning · 20.09.2014, 17:00

Смотря какой диалект.
Общий принцип примерно такой:

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
FUNCTION firstlastdigit (sourcenumber AS INTEGER, numberbase AS INTEGER) AS INTEGER
    DIM temp AS INTEGER
    temp=sourcenumber MOD numberbase
    sourcenumber=(sourcenumber-temp)/numberbase
    temp=0
    DO UNTIL sourcenumber MOD numberbase^temp = sourcenumber
        temp=temp+1
    LOOP
    temp=temp-1
    sourcenumber=sourcenumber MOD numberbase^temp
    RETURN sourcenumber
END FUNCTION

В случае только с 10-ричной системой счисления, что еще проще.

@Quiet Snow · 24.09.2014, 10:39

Как удалить из числа первую и последнюю цифру?

Не знаю насчёт "первой и последней" но цифру в первом десятке можно убрать, поделив число на 10,
цифра в последнем разряде убирается вычитанием этого всего разряда, который можно получить
через логарифмы.

QBasic/QuickBASIC
1
2
3
4
5
CLS
5 INPUT "Vvedi chislo (bolshe 2 cifr): ", ch: IF ch < 100 THEN 5
a = 10 ^ INT(LOG(ch) / LOG(10))
ch = (ch - (a * (ch \ a))) \ 10
PRINT ch

@Апострофф · 24.09.2014, 10:47

Как удалить первую и последнию цифру из числа?

Visual Basic
1
print (v \ 10) Mod 10 ^ (Int(Log(v) / Log(10)) - 1)

shanemac51 · 27.09.2014, 21:31

Visual Basic
1
2
'' первую
k2=val(mid(k1 & " ",2))

@Polls · 28.09.2014, 00:25 **[ТС]**

...

@Taniai · 28.09.2014, 09:14

Как удалить из натурального числа первую цифру?

shanemac51 · 28.09.2014, 09:55

Visual Basic
1
2
'' первую
k2=val(mid(k1 & " ",2))

Новые блоги и статьи Все статьи Все блоги /
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android 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 и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом

@Polls 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 15

	Как удалить из числа первую и последнюю цифру? 20.09.2014, 12:23. Показов 4060. Ответов 7 Метки нет (Все метки) Как удалить из числа первую и последнюю цифру? 0

@Polls 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 15
	28.09.2014, 00:25 [ТС]
	... 0

@Taniai 0 / 0 / 0 Регистрация: 28.09.2014 Сообщений: 5
	28.09.2014, 09:14
	Как удалить из натурального числа первую цифру? 0