Перевеси из 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.

Сейчас в мире развиваются новые технологии. Сейчас книги не пишут в ручную, а печатают на компьютере. Нам сложно прожить без интернета "каждый день мы ищем там интересную информацию, узнаем новое, смотрим фильмы, учимся".Кто то зарабатывает в интернете. Мне кажется что информатику нужно изучать для того чтобы в будущем мы были развиты в компьютерных технологиях и умели работать за компьютером. Потому что учителя, работники офисов, врачи и еще много профессий зависят от компьютеров, а информатика учит нас быть с компьютерами на ты.
.
P.S. писал сам)

К первому поколению относят ламповые машины 1940-х годов, которые пришли на смену табуляторам. Скорость счета у них доходила до 20 тысяч операций в секунду. Данные вводились с перфокарт и перфоленты

2.Технологии хранения данных активно совершенствуются со времен появления первых компьютеров. Еще вчера мы пользовались 1,44-мегабайтными дискетами, а сегодня в продаже можно найти 256-гигабатные флеш-накопители. А ведь это далеко не предел. Пока инженеры трудятся над созданием новых, более прогрессивных носителей информации, мы вспоминаем, как повлияли на компьютерную индустрию перфокарты, магнитные ленты и форматы CD и DVD