Информацию можно потерять к примеру забыть или записать на листок а потом выкинуть листок удалить информацию с копютера
Один из самых простых 1221 (7+3*2*2+3)=43
Var x,y:real;
begin
write('x = '); readln(x);
if x>12
then y:=2*x+15
else if x=12 then y:=54.4 else y:=-7.8;
writeln('y = ',y);
end.
Пример:
x = 10
y = -7.8
5-тиичная система исчисления, тк 33+124+131=343
берем последнии цифры 3+4+1=13 , в этой системе исчисления 1+4 это переход в следующий разряд. 3 записываем, а 1 запоминаем. Следующие цифры 3+2+3 и +1(которую запомнили)=14. Итд