Ответы на вопрос:
var a,b,n,m,k,cn,c1: longint; beginread(a,b); if a> b then n: =b else n: =a; cn: =n mod 10; m: =n; k: =1; while n> 0 do begin c1: =n mod 10; k: =k*10; n: =n div 10; end; n: =m-c1*(k div 10)+cn*(k div 10)-cn+c1; writeln(''); write(n); end.
Популярно: Информатика
-
lolkek21307.01.2020 01:17
-
дана39621.01.2020 05:29
-
mashazygmangovich02.01.2023 05:16
-
k1974527.05.2022 20:49
-
Lizevette01.03.2023 20:24
-
тамок13.04.2020 08:02
-
Vasianeumaha20.10.2022 07:04
-
Виктория2005280829.12.2021 06:36
-
Jessabelle27.05.2022 19:56
-
ANDROI22313.11.2020 01:40