Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
таир20
08.06.2020 20:13 •
Информатика
Паскаль (нужно написать программу) найдите сумму кубов двухзначных чисел, у которых первая цифра четная, а вторая равна 1.
Показать ответ
Ответ:
Maria150305
05.10.2020 16:01
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
Write(Range(2,8,2).Select(n->sqr(10*n+1)*(10*n+1)).Sum)
end.
Результат
836604
0,0
(0 оценок)
Популярные вопросы: Информатика
РумакСтепан
01.02.2021 18:12
1. дан массив x (20), заполненный датчиком случайных чисел в диапазоне от -50 до 50 включительно. сформировать новый массив из положительных элементов массива х. в новом массиве найти...
ЯРОСЛАФ
15.12.2021 10:18
1)какой минимальный объём памяти (в кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 64 на 64 пикселов при условии, что в изображении могут...
ннннн43
15.12.2021 10:18
Составьте программу вставки в массив a(n) пятого элемента, равного 8....
Jina9845
05.12.2022 16:56
Написать программу в Паскале: рассчитать значения y при каждом х. х = 3, 4, ..., 25: y = 2t2 + 5,5t – 3, если t = x + 2....
MilkaV
05.12.2022 16:56
До ть !! Написати команду в Python яка буде визначати чи буде ділитися число яке ти введеш на 6...
Anytohka0cosmos
16.03.2022 03:55
Продолжи ряд десятичных чисел. г) 1 2 4 8 - -...
zyzae
01.07.2022 07:20
Переменные и описаны в программе как целочисленные. определите значение переменной х после выполнения следующего фрагмента программы: x : = 432; y : = x div 100; x : = ( x mod 100...
grofro228
01.07.2022 07:20
Определите значение суммы целочисленных переменных x и после выполнения фрагмента программы: x : = 4 + 8 * 3 ; y : = ( x mod 10 ) + 15; x : = ( y div 10 ) + 3...
виолетта409
06.01.2021 18:40
Подготовьте небольшое сообщение на тему как правильно вести себя на улице...
polyaketoztt67
06.01.2021 18:40
Для приготовления салата нужно 6 кг овощей.40 процентов из них были сладкий перец,лук 1/10 от всего состава салата,остальное была капуста.сколько кг каждых овощей было в салате? нарисуй...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
Write(Range(2,8,2).Select(n->sqr(10*n+1)*(10*n+1)).Sum)
end.
Результат
836604