35 ! переведите с pascal на c++ ( с олимпиады, дал преподаватель решить, я не могу) var digits : array[0..9] of integer; i, j, n : integer; begin for i : = 0 to 9 do digits[i] : = 0; read(n); for i : = 1 to 4 do begin j : = n mod 10; inc(digits[j]); n : = n div 10 end; for i : = 1 to 9
do if digits[i] > 0 then begin write(i); dec(digits[i]); break end; for j : = 1 to 3 do for i : = 0 to 9 do if digits[i] > 0 then begin write(i); dec(digits[i]); break end end.

Phelper    1   08.10.2019 14:00    1