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

Есть ответ
17.12.2022
397

Ответ


Program swap

var a,b,c,n,m : integer;

begin

readln(n);

a:=n mod 10;

m:=n-a;

n:=m/10;

b:=n mod 10;

m:=n-b;

c:=m/10;

m:=a*100+b*10+c;

writeln('Ответ:', n);

readln;

end


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.