Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
PascalABC.NET Необходимо организовать создание файла, просмотр, дополнения, изъятия https://www.cyberforum.ru/pascalabc-net/thread1296890.html
ПОМОГИТЕ ПОЖАЛУЙСТА С ФАЙЛАМИ... Файл F генерируется из случайных чисел, размерность файла указывает пользователь. Необходимо организовать создание файла, просмотр, дополнения, изъятия. А также в...
PascalABC.NET Вычислить результат побитовых логических операций AND и OR над двумя числами
Помогите пожалуйста написать программу, вычисляющую результат побитовых логических операций AND и OR над двумя числами (ввод чисел и вывод результата должен быть в десятичной системе). Через...
PascalABC.NET Преобразовать массив таким образом чтобы элементы главной диагонали были равны единице
Вообщем такая проблема. Дали на курсах задачу написать программу: Сформировать массив 10 на 10 заполненный нулями(0), затем вывести его на экран , после чего преобразовать таким образом что бы...
PascalABC.NET Подсчитать, какие предметы можно купить на определенную сумму Требуется определить, сколько можно приобрести ручек (по цене 10 руб.), карандашей (5 руб.) и ластиков (2 руб.) на 100 рублей. При этом всего предметов должно быть 30. const cruch=10; ckar=5;... https://www.cyberforum.ru/pascalabc-net/thread1296616.html
PascalABC.NET Количество повторящихся элементов в каждом столбце матрицы https://www.cyberforum.ru/pascalabc-net/thread1296388.html
Уважаемый форум Решите, пожалуйста, задачу. В текстовом файле представлена прямоугольная таблица, она же матрица. По столбцам прочесть, какие в них представлены элементы и подсчитать...
PascalABC.NET Выполнить перестановку элементов массива
1)рабочее задание Составить схему алгоритма и разработать программу, выполняют следующие действия : - Введение одномерного массива ( вектора ) ; - Вывод значений одномерного массива вместе с их...
PascalABC.NET Бинарное дерево
Создать структуру "бинарное дерево" с элементами файла из действительных чисел. Количество элементов массива n>28. Создать подпрограмму для изменения значений отрицательных элементов на их модули.
PascalABC.NET Вычислить приближенное значение числа 3/4 Вычислить приближенное значение числа 3/4 с точностью до E=0.001 https://www.cyberforum.ru/pascalabc-net/thread1295877.html
PascalABC.NET Встречено else, а ожидалось ';' https://www.cyberforum.ru/pascalabc-net/thread1295782.html
var a1,b1,a,b: real; begin Writeln('Введите А'); readln(a); Writeln('Введите B'); readln(b); a1:=0; b1:=0; if a>b then
PascalABC.NET Дано натуральное n, действительные а1, а2,., ап. Вычислить Дано натуральное n, действительные а1, а2,., ап. Вычислить в паскале АВС https://www.cyberforum.ru/pascalabc-net/thread1295759.html
Puporev
Модератор
58944 / 44619 / 30794
Регистрация: 18.05.2008
Сообщений: 106,920
11.11.2014, 14:38 0

Вывести все цифры 5-значного числа

11.11.2014, 14:38. Просмотров 959. Ответов 5
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
a:=nmb div 10000;
b:=nmb div 1000 mod 10;
c:=nmb div 100 mod 10;
d:=nmb div 10 mod 10;
e:=nmb mod 10;


Вернуться к обсуждению:
Вывести все цифры 5-значного числа
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.11.2014, 14:38

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры.
Хорошая тема,поэтому ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ!!!! Условие: Вывести на экран все трехзначные числа,...

Как вывести все четырёхзначные числа у которых все цифры разные
программа которая выводит все четырех значение числа у которых все цифры разные я не понимаю...

Вывести все четные цифры из числа
Всем привет! Помогите пожалуйста. Нужно вывести все четные цифры из числа Например дано число...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.