дано трехзначное число,

@Cl1kUs · Регистрация: 18.10.2011

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

дано трехзначное число,
найти полученное при прочтении его чисел с права на лево
Пример: вводим 358, надо что бы получилось 853.

@shum_ont · 16.11.2011, 14:21

Pascal
1
2
3
4
5
6
7
8
var i,buf:string;
    i2:byte;
begin
read(i);
for i2:=0 to Length(i)-1 do
   buf:=buf+i[Length(i)-i2];
write(buf);
end.

@Севак · 16.11.2011, 14:25

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var x,a,b,c: integer;
begin
writeln('Введите трехзначное число');
readln(x);
if (x>99) and (x<1000) then
begin
a:=x div 100;
b:=(x div 10) mod 10;
c:=(x mod 100) mod 10;
writeln(c,b,a);
end
else writeln('Число не трехзначное');
end.

@Cl1kUs · 16.11.2011, 14:43 **[ТС]**

Все, у меня получилось уже.
Если кому интересно то вот:

Pascal
1
2
3
4
5
6
7
8
9
10
11
program pas;
var a,b,c,n:integer;
 
Begin
  write('');
  readln (n);
  a:=n div 100;
  b:=(n mod 100) div 10;
  c:=(n mod 100) mod 10;
  writeln(c,b,a);
  end.

@Севак · 16.11.2011, 14:45

Сообщение от Cl1kUs

Все, у меня получилось уже.
Если кому интересно то вот:

Pascal
1
2
3
4
5
6
7
8
9
10
11
program pas;
var a,b,c,n:integer;
 
Begin
  write('');
  readln (n);
  a:=n div 100;
  b:=(n mod 100) div 10;
  c:=(n mod 100) mod 10;
  writeln(c,b,a);
  end.

при вводе не трехзначных цифр получается не правильное решение, поэтому делай условие, как у меня выше, а лучше цикл, чтобы много раз вводить числа, но я пока хз как

@Cl1kUs · 16.11.2011, 14:51 **[ТС]**

Мне на трех значное и надо число, большие числа кстате некоторые правильно показывает а некоторые нет, ну в принцепи у меня получилось сделать для трех значного числа.

@taras atavin · 16.11.2011, 14:53

Сообщение от Cl1kUs

дано трехзначное число, найти... его чисел...

У числа не может быть чисел. Вот представь: "дома этого дома должны быть заселены не позже первого октября", "автомобили этого автомобиля спроектированы в автокаде". У тебя точно такая же фигня.

@Севак · 16.11.2011, 14:54

Сообщение от taras atavin

У числа не может быть чисел. Вот представь: "дома этого дома должны быть заселены не позже первого октября", "автомобили этого автомобиля спроектированы в автокаде". У тебя точно такая же фигня.

цифр, опечатался наверное

@taras atavin · 16.11.2011, 15:07

И задачу за тебя ни кто не составит, это ты должен знать, чего хочешь. Кстати, какое отношение к паскалю имеет составление задач?

@Puporev · 16.11.2011, 15:11

Кстати по условию нужно не цифры числа вывести задом наперед, а поучить новое число, с котрым можно будет и дальше работать.

@Севак · 16.11.2011, 15:38

Сообщение от Puporev

Кстати по условию нужно не цифры числа вывести задом наперед, а получить новое число, с которым можно будет и дальше работать.

ну так если ему нужно было, пусть бы написал, правда я не знаю как это сделать )

@Puporev · 16.11.2011, 15:45

Сообщение от Севак

правда я не знаю как это сделать

да просто

Pascal
1
y:=(x div 100)+(x div 10 mod 10)+(x mod 10)*100;

@Севак · 16.11.2011, 15:54

Сообщение от Puporev

да просто

Pascal
1
y:=(x div 100)+(x div 10 mod 10)+(x mod 10)*100;

если правильно тебя понял, то будет вот так:

Pascal
1
y:=(x div 100)+(x div 10 mod 10)*10+(x mod 10)*100;

пример: 325
y=3+2*10+5*100=523

@Puporev · 16.11.2011, 15:55

Да, пропустил *10.

Новые блоги и статьи Все статьи Все блоги /
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений в EXE. Здесь описаны базовые шаги для старта программирования с помощью CMake и MinGW. Для набора. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .

@Cl1kUs 0 / 0 / 0 Регистрация: 18.10.2011 Сообщений: 28

	дано трехзначное число, 16.11.2011, 14:15. Показов 23516. Ответов 13 Метки нет (Все метки) дано трехзначное число, найти полученное при прочтении его чисел с права на лево Пример: вводим 358, надо что бы получилось 853. 0

@Cl1kUs 0 / 0 / 0 Регистрация: 18.10.2011 Сообщений: 28
	16.11.2011, 14:51 [ТС]
	Мне на трех значное и надо число, большие числа кстате некоторые правильно показывает а некоторые нет, ну в принцепи у меня получилось сделать для трех значного числа. 0

@taras atavin 4226 / 1796 / 211 Регистрация: 24.11.2009 Сообщений: 27,562
	16.11.2011, 15:07
	И задачу за тебя ни кто не составит, это ты должен знать, чего хочешь. Кстати, какое отношение к паскалю имеет составление задач? 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	16.11.2011, 15:11
	Кстати по условию нужно не цифры числа вывести задом наперед, а поучить новое число, с котрым можно будет и дальше работать. 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	16.11.2011, 15:55
	Да, пропустил *10. 0