Написать программу формирующую словарный эквивалент

[Tata.8383]

привет!помогите пожалуйста решить задачу: написать программу формирующую словарный эквивалент введённому трёхзначному натуральному числу.

[Asix]

Что Вы делали и что не получается?
Какие есть свои мысли?? =))

Для начала нам интересны Ваши мысли и действия для решения задачи, дальше мы обязательно поможем и подталкнем =))

На каком языке должна быть программа?

[testtest]

задача на несколько условных операторов

Код: [Выделить]

declare @n int

select @n = 956
select substring('сто      двести   триста   четырестапятьсот  шестьсот семьсот  восемьсотдевятьсот', (@n/100-1)*9+1, 9) + ' ' +
       substring('     два  три  сорокпят  шест сем  восемдевя ',((@n%100) / 10 - 1)*5 + 1, 5) +
       case
         when (@n % 100) / 10 in (2,3) then 'дцать'
         when (@n % 100) / 10 in (5,6,7,8) then 'ьдесят'
         when (@n % 100) / 10 in (9) then 'носто'
       end + ' ' +
       substring('один дв   три  четырпят  шест сем  восемдевят',(@n%10 - 1)*5 + 1, 5) +
       case
         when (@n % 100) / 10 = 1 then
           case
             when @n % 10 = 2 then 'енадцать'
             when @n % 10 = 0 then 'десять'
             else 'надцать'
           end
         else
           case
             when @n % 10 in (2) then 'а'
             when @n % 10 in (4) then 'е'
             when @n % 10 in (5,6,7,8,9) then 'ь'
           end
       end


[offtop]
интересно, отрицательное целое число между -999 и -100 можно считать трехзначным? у него ведь знак "минус", и он тоже "значит".
[/offtop]

[Tata.8383]

Спасибо,я немного по другому решила

[testtest]

Неужели на Лиспе?