Работа с разрядами пятизначного числа

@ВиЛи · Регистрация: 14.04.2016

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

Здравствуйте! Помогите решить программу в Паскаль.
_вводится с клавиатуры пятизначное числ
-вывести
-число единиц
-число десятков...
-сумму разрядов вывести
-число наоборот вывести
-является ли число четным\нечетным

Буду очень благодарна за ответ. Спасибо!

@ZX Spectrum-128 · 14.04.2016, 09:55

Внизу страницы "Похожие темы".

@a1d4r · 14.04.2016, 15:54

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var n, n1, n2, n3, n4, n5: longint;
begin
  repeat
    write('Введите пятизначное число: ');
    read(n);
  until (n >= 10000) and (n <= 99999);
  n1 := n mod 10;
  n2 := n div 10 mod 10;
  n3 := n div 100 mod 10;
  n4 := n div 1000 mod 10;
  n5 := n div 10000;
  writeln('Единиц: ', n1);
  writeln('Десятков: ', n2);
  writeln('Сумма разрядов: ', n1 + n2 + n3 + n4 + n5);
  writeln('Число наоборот: ', n1, n2, n3, n4, n5);
  if n mod 2 = 0 then writeln('Число четное')
  else writeln('Число нечетное');
end.

Новые блоги и статьи Все статьи Все блоги /
Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .

@ВиЛи 0 / 0 / 0 Регистрация: 14.04.2016 Сообщений: 1

	Работа с разрядами пятизначного числа 14.04.2016, 09:08. Показов 5062. Ответов 2 Метки нет (Все метки) Здравствуйте! Помогите решить программу в Паскаль. _вводится с клавиатуры пятизначное числ -вывести -число единиц -число десятков... -сумму разрядов вывести -число наоборот вывести -является ли число четным\нечетным Буду очень благодарна за ответ. Спасибо! 0

@ZX Spectrum-128 6812 / 4568 / 4820 Регистрация: 05.06.2014 Сообщений: 22,433
	14.04.2016, 09:55
	Внизу страницы "Похожие темы". 0

Работа с разрядами пятизначного числа

Решение