Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево.

@Дарьюшка · Регистрация: 03.02.2012

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

Помогите пожалуйста решить задачу,если можно с объяснением Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево.

Kodzaev · 04.02.2014, 20:26

Вывести число, полученное при прочтении исходного числа справа налево

@ildwine · 04.02.2014, 20:30

Pascal

var
  a, b, a1, a2, a3 : integer;
begin
  {ввод числа c проверкой...}
  repeat
    write('введите трёхзначное число: ');
    readln(a)
  until (a >= 100) and (a <= 999); {проверяем чтобы число было трёхзначным}
  {разложение на множители}
  a1 := a mod 10; {остаток от деления числа на 10 - правая цифра}
  a2 := (a div 10) mod 10; {делим на 10, берем целую часть,
  ее на 10 - берем остаток - средняя цифра}
  a3 := a div 100; {целая часть от деления на 100 - левая цифра}
  {вывод в обратном порядке}
  b := a1 * 100 + a2 * 10 + a3;
  write(b);
  readln
end.

Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево.

Решение

Решение

@Дарьюшка 0 / 0 / 0 Регистрация: 03.02.2012 Сообщений: 56
		1
	Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево. 04.02.2014, 20:18. Показов 10570. Ответов 2 Метки нет (Все метки) Помогите пожалуйста решить задачу,если можно с объяснением Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево. 0

Kodzaev 3030 / 1916 / 1649 Регистрация: 30.04.2011 Сообщений: 3,060
	04.02.2014, 20:26	2
	Сообщение было отмечено ildwine как решение Решение Вывести число, полученное при прочтении исходного числа справа налево 1

	04.02.2014, 20:30