)) программа на паскале.ввести натуральные числа и их количество. найти и вывести количество чисел, кратных трем и окачивающихся на 5. если что то непонятно, пишите, уточню.
210
296
Ответы на вопрос:
Var n,i,k,d: integer; begin write('количество чисел='); read(n); k: =0; writeln('вводите числа, после каждого числа нажимайте enter'); for i: =1 to n do begin read(d); if (d mod 3 = 0) and (d mod 10 = 5) then inc(k) end; writeln('количество чисел, удовлетворяющих условию, равно ',k) end. тестовое решение: количество чисел=8 вводите числа, после каждого числа нажимайте enter 537 125 5 35 999 3 1005 75 количество чисел, удовлетворяющих условию, равно 2
Программа точно по условию: var a,d,s: integer; begin write('искомые числа: '); for a: = 300 to 600 do begin s: =a+1; d: =a div 2; while d> 1 do begin if a mod d = 0 then s: =s+d; d: =d-1 end; if s = 50 then write(' ',a); end end. программа, разумеется, не выдаст ни одного числа, т.к. каждое число делится на себя и на единицу. то есть сумма делителей всегда будет больше 301. если не брать в расчёт само число и единицу, то программа будет выглядеть так: var a,d,s: integer; begin write('искомые числа: '); for a: = 300 to 600 do begin s: =0; d: =a div 2; while d> 1 do begin if a mod d = 0 then s: =s+d; d: =d-1 end; if s = 50 then write(' ',a); end end. результат работы программы: искомые числа: 301 481 589
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Anastasia15Kovaleva02.02.2021 12:20
-
Агааемгов13.09.2021 16:49
-
zhahbota13.01.2023 17:53
-
fariza197403.01.2022 12:54
-
котикkatya30.06.2022 00:01
-
Оля01072005.10.2021 06:35
-
Ошлиарлт14.02.2021 10:02
-
Filip1is18.08.2020 03:44
-
юля271315.08.2020 05:17
-
mrartemartem113.01.2023 06:03
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.