Переставить цифры в числе

@gor25 · Регистрация: 11.04.2010

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

Помогите!!!
Условие:дано 3-значное число
найдите число при перестановки 2 и 3 цифры заданного числа.

@Puporev · 11.04.2010, 17:19

Pascal

1	b:=(a div 100)100+(a mod 10)10+(a div 10 mod 10);

@gor25 · 11.04.2010, 17:22 **[ТС]**

Напишите все решение пожалуйста я только начил решать подобные задачи.

@Puporev · 11.04.2010, 17:25

gor25, Извините, но объявить 2 переменные целого типа, ввести 3х-значное число и вывести результат, это Вы обязаны уметь, Вас этому учили, если нет, почитайте.

@gor25 · 11.04.2010, 17:39 **[ТС]**

Pascal

Program host;
Var
a,b,c,d,e: integer;
Begin
Writeln(<введите число>);
Readln(а);
b:= а div 100;
c:= а div 10 - b * 10;
d:= а mod 10;
e:= b * 100 + d  * 10 + c;
Writeln('число сотен=',b,'число десятков=',c,'число единиц=',d);
Readln;
end.

Исправьте где неправильно пожалуйста!

Добавлено через 5 минут
Никак не получается помогите!!!

@Puporev · 11.04.2010, 17:40

Pascal

uses crt;
var a,b:word;
begin
clrscr;
repeat
write('Введите трехзначное число a=');
readln(a);
until (a>=100)and(a<=999);
b:=(a div 100)*100+(a mod 10)*10+(a div 10 mod 10);
write('Перестановка второй и третьей цифр:  ',b);
readln
end.

@gor25 · 11.04.2010, 17:43 **[ТС]**

Огромное спасибо!!!

Новые блоги и статьи
Использование связки C# и PHP в корпоративной разработке и микросервисной архитектуре InfoMaster 16.01.2025 Введение в интеграцию C# и PHP В современной корпоративной разработке все чаще возникает потребность в создании гибких и масштабируемых решений, способных эффективно решать широкий спектр. . .	Как использовать Kerio дома для управления сетью и пользователями InfoMaster 16.01.2025 Использование технологий для улучшения повседневной жизни стало неотъемлемой частью современного быта. Одной из таких технологий является Kerio — мощный инструмент для управления сетью и. . .	Есть ли будущее у DVD и Blu-ray? InfoMaster 16.01.2025 В эпоху стремительного развития цифровых технологий и повсеместного распространения потоковых сервисов вопрос о будущем физических носителей информации становится все более актуальным. Особенно остро. . .	Как проводить научные вычисления на Python InfoMaster 15.01.2025 Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .	Создание игры типа Minecraft на PyGame/Python: пошаговое руководство InfoMaster 15.01.2025 В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .	Как создать свою первую игру в стиле Doom на Unreal Engine InfoMaster 15.01.2025 Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .
Параллельное программирование: основные технологии и принципы InfoMaster 15.01.2025 Введение в параллельное программирование Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .	Как написать микросервис на C# с Kafka, MediatR, Redis и GitLab CI/CD InfoMaster 15.01.2025 В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .	Что такое CQRS и как это реализовать на C# с MediatR InfoMaster 15.01.2025 Концепция CQRS и её роль в современной разработке В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .	Как настроить CI/CD с Azure DevOps InfoMaster 15.01.2025 CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .	Как настроить CI/CD с помощью Jenkins InfoMaster 15.01.2025 Введение в CI/ CD и Jenkins В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .	Как написать микросервис на Go/Golang с Kafka, REST и GitHub CI/CD InfoMaster 14.01.2025 Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .

@gor25 0 / 0 / 0 Регистрация: 11.04.2010 Сообщений: 7
		1
	Переставить цифры в числе 11.04.2010, 17:15. Показов 3447. Ответов 6 Метки нет (Все метки) Помогите!!! Условие:дано 3-значное число найдите число при перестановки 2 и 3 цифры заданного числа. 0

@gor25 0 / 0 / 0 Регистрация: 11.04.2010 Сообщений: 7
	11.04.2010, 17:22 [ТС]	3
	Напишите все решение пожалуйста я только начил решать подобные задачи. 0

@Puporev Почетный модератор 64305 / 47602 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	11.04.2010, 17:25	4
	gor25, Извините, но объявить 2 переменные целого типа, ввести 3х-значное число и вывести результат, это Вы обязаны уметь, Вас этому учили, если нет, почитайте. 0

@gor25 0 / 0 / 0 Регистрация: 11.04.2010 Сообщений: 7
	11.04.2010, 17:43 [ТС]	7
	Огромное спасибо!!! 0

Опции темы