Сколько чисел в натуральном ряду от 1 до 100000, которые не делятся на числа 2,3,5,7,11,13 и на простое число с номером 11+1 среди простых чисел в натуральном ряду

195

425

Посмотреть ответы 2

Ответы на вопрос:

lianochkaya14

Информатика

4,7(80 оценок)

ответ 18662

реализация на haskell

divisors n = [x | x < - - 1)], rem n x == 0]primes = [n | n < - [1..], isprime n] where isprime x = (divisors x == [1])prime = last $ take (11+1) primes

calc : : integer-> integer-> integercalc x sm | x> 100000 = smcalc x sm | (x `mod` 2 /= 0 & & x `mod` 3 /= 0 & & x `mod` 5 /= 0 & & x `mod` 7 /= 0 & & x `mod` 11 /= 0 & & x `mod` 13 /= 0 & & x `mod` prime /= 0) = calc (x+1) (sm+1) | otherwise = calc (x+1) sm

main : : io ()main = putstrln $ show $ calc 1 0

tor142003

Информатика

4,8(47 оценок)

ответ:1772862•лв

Объяснение:

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.