Question

Дано четырехзначное число найдите число полученное при прочтении его цифр справно налево

Answer 1

Предполагается, что число положительное.

var
  n:integer;
 
begin
  Write('n='); Read(n);
  while n>0 do begin
    Write(n mod 10);
    n:=n div 10
    end
end.

Пример
n=3607
7063

Answer 2

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

Например, если дано число 1234, то число, полученное при прочтении его цифр справа налево, будет 4321.