Из четырехзначного числа получить: первое число - сумма тысяч и сотен, второе - десятков и единиц

28.05.2013, 15:10. **Показов** 1959. **Ответов** 1

Студворк — интернет-сервис помощи студентам

Кто понимает Haskell решите задачу пожалуйста
Из четырехзначного числа получить число суммированием цифр, первое число - сумма тысяч и сотен, второе - десятков и единиц

например: 1522=64

@Mysterious Light · 28.05.2013, 17:00

Неинтересная:

Haskell

f x = let
    a = mod x 10
    b = mod (div x 10) 10
    c = mod (div x 100) 10
    d = div x 1000
    in (a+b) + 10*(c+d)

Опции темы