Ответ:
program abc;
var s:string;
begin
readLn(s);
s:=IntToStr((StrToInt(s[2])+StrToInt(s[3])) mod 10)+IntToStr(abs(StrToInt(s[1])-StrToInt(s[3])))+IntToStr(StrToInt(s[2]) mod StrToInt(s[1]));
writeLn(s);
end.
Объяснение:
Истинное-У кошки Мурки один хвост.
Ложное-Наше домашнее животное муравей.
Сначала опишем алгоритм.
Из числа M вида “ABC” требуется получить число N вида “CBA”.
Для этого необходимо найти такое число К, что M+K=N.
100A+10B+C+K=100C+10B+A
99A+K=99C
K=99C-99A=99(C-A)
Формула получения искомого слагаемого получена. Теперь запишем формулы для получения чисел A и C из N.
A=[N/100]
C=N-10*[N/10]
Теперь можно составить блок-схему.
1) Начало
2) Ввод числа M
3) A=[N/100]
C=N-10*[N/10]
K=99*(C-A)
N=M+K
4) Вывод N
5) Конец.