Перевести с pascal в python или c++ var b,i: longint; c: integer; function sm(n: longint): longint; begin if n< 10 then sm: =n else sm: =n+sm(inttostr(n).tochararray.select((c: char)-> ord(c)-48).sum); end; begin readln(b); for c: =1 to length(inttostr(b)) do i: =i+c*9; i: =range(b-i,b).select(i-> ord(sm(i)=b)*i).max; if i> 0 then writeln(i) else writeln('-1'); end.

CailiVinchisiter CailiVinchisiter    2   17.03.2019 11:17    2

Другие вопросы по теме Информатика