Найти первую цифру в десятичной записи четырехзначного натурального числа - Помощь студентам

Marcus75 · 24.04.2016, 17:17

Доброго времени суток форумчане.
Как в delphi при вводе четырехзначного натурального числа найти первую цифру в десятичной записи?

Аватар · 24.04.2016, 18:01

div

Вадим Мошев · 24.04.2016, 20:19

Код:

result := yourNumber div 1000;

или как вариант:

Код:

result := intToStr(yourNumber)[1];

24.04.2016, 17:17	#1
Marcus75 Пользователь Регистрация: 19.12.2011 Сообщений: 15	Найти первую цифру в десятичной записи четырехзначного натурального числа Доброго времени суток форумчане. Как в delphi при вводе четырехзначного натурального числа найти первую цифру в десятичной записи?

24.04.2016, 18:01	#2
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	div Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

24.04.2016, 20:19	#3
Вадим Мошев Старожил Регистрация: 12.11.2010 Сообщений: 8,568	Код: `result := yourNumber div 1000;` или как вариант: Код: `result := intToStr(yourNumber)[1];` Последний раз редактировалось Вадим Мошев; 24.04.2016 в 20:22.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Найти первую цифру в ячейке	competing	Microsoft Office Excel	18	11.05.2016 10:38
Первую цифру числа удалить прибавить к тому что осталось	Наташа17	Visual C++	2	28.02.2015 18:42
Машина Тьюринга: Постройте функциональную схему машины, реализующей переход от десятичной записи числа n к десятичной записи (n-1)	Елешечка	Помощь студентам	0	02.04.2014 21:43
Задача:Найти максимальное из цифр четырехзначного числа	Obender13	Помощь студентам	1	07.11.2009 08:07
Найти первую цифру в данных ячейки..	kra183	Microsoft Office Excel	11	09.05.2008 01:35