Question

ПАСКАЛЬ Дано натуральное число, получить число, образованные при прочтении справа налево X=317 y=70

Answer 1

var

   a, b : integer;

begin

   write('введите число: ');

   readln(a);

   while a > 0 do begin

       b := b*10+(a mod 10);

       a := a div 10;

   end;

   writeln(b);

end.

Answer 2

Var a:string;
i:Integer;
begin
read(a);
for i:=Length(a) downto 1 do
write(a[i]);
end.
полегче надо

Answer 3

Для получения числа, образованного при прочтении справа налево из данного натурального числа, нужно развернуть его порядок цифр. Для примера, возьмем число X=317:

1. Получаем последнюю цифру числа X, которая равна 7.
2. Убираем последнюю цифру из числа X, получая 31.
3. Получаем последнюю цифру числа 31, которая равна 1.
4. Убираем последнюю цифру из числа 31, получая 3.

Теперь объединяем полученные цифры в обратном порядке: 7, 1, 3. Получаем число Y=713.

Таким образом, для X=317 получим Y=713.