<span>1. [1, 2] ∩ [9, 19]
2. {1, 4}
3. Множество всех многочленов с целыми коэффициентами.
4. Множество непрерывных функций на отрезке [0, 1].</span>
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var s:=ReadlnString.OrderBy(c->c).ToArray;
var i:=s.FindIndex(t->t<>'0'); Swap(s[0],s[i]);
s.Println
end.
<u>Пример</u>
54560345345601323451233903454658345034521212
10000111222223333333334444444455555555566689
4) а < 0
судя по этому должна быть ошибка в паскале...
Пусть массы корзин k1 k2, ягод - y1 y2
Тогда
k1+y1=a1
k2+y2=b1
k1+y1+y2=a2
k2=b2
k1=a3
k2+y1+y2=b3
Как видишь, математики - полные лохи, количество данных даже избыточно. Возьмем только
y1=a1-a3
y2=b1-b2
Теперь осталось сравнить 2 полученных числа.