Регистрация
Войти
Стать экспертом Правила
Информатика

Пожалуйста посчитайте! Паскаль (нужно написать программу)Найдите сумму кубов двухзначных чисел, у которых первая цифра четная, а вторая равна 1.

ОТВЕТЫ



begin
  Write(Range(2,8,2).Select(n->sqr(10*n+1)*(10*n+1)).Sum)
end.


836604
551
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам