Begin
writeln(CHR(68)); // D
writeln(ORD('d')); // 100
writeln(PRED(1)); // 0
writeln(SUCC('Я')); // а
<span>end.</span>
Var a,b,c,d,m:real;z:boolean;
Begin
read(a,b,c,d);
if (a<=b) and (b<=c) and (c<=d) then
begin
m:=max(max(a,b),max(c,d));
a:=m;
b:=m;
c:=m;
d:=m;
end
else if (a>b) and (b>c) and (c>d) then z:=true
else begin
a:=a*a;
b:=b*b;
c:=c*c;
d:=d*d;
end;
writeln(a,' ',b,' ',c,' ',d);
End.
A, b, c = input().split() # строка не нужна, если переменные уже определены
a, b, c = c, a, b
print(a, b, c)
А) ЛПНРЭЯУЖС НПОЙУПС ЛБГЙБУСБ
б) ЛОЙДБ ВФНБДБ РБПЙСФТ
в) РСЙОУЁС УЁУСБЕЭ СБЕЙП
<span>Самая большая поразрядная сумма 18, значит, те у которых она больше, выкидываем
1616 - подходит (</span>например, <span>888)
169 16'9 </span> - подходит (например, 881)<span>
163 16'3</span> - подходит, но чтобы получить 16 во втором разряде как минимум должно быть 7 (97), тогда, даже если в третьем 0, уже сумма будет больше 3. Выкидываем<span>
1916 </span>Выкидываем<span>
1619 </span>Выкидываем<span>
316 3'16 не подходит, последовательность возрастает
916 9'16 </span>не подходит, последовательность возрастает<span>
116 подходит (например, 560)
Итого, три числа</span>