Паскаль составьте программу, которая заполняет одномерный массив двадцатью первыми натуральными числами, кратными 5 или 7. полученный массив вывести на экран.
278
466
Ответы на вопрос:
Uses crt; var counter: integer; numbers: array [0..19] of integer; arraycounter: integer; begin counter : = 0; arraycounter : = 0; repeat if(counter mod 5 = 0) or (counter mod 7 = 0) then begin numbers[arraycounter] : = counter; inc(arraycounter); end; inc(counter); until arraycounter = 20; for var i : = 0 to 19 do writeln(numbers[i]); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
golicinskaya31.03.2020 13:40
-
AnToNoVa1317.04.2021 02:16
-
аня283613.07.2022 15:25
-
у2цциволв125.06.2020 04:21
-
34Марго3507.11.2021 13:25
-
gerasimooffq29.04.2022 12:02
-
lera105908.06.2022 09:21
-
sargsyana52405.11.2022 13:49
-
vladshumigayoypa3u25.06.2020 01:47
-
pollyj08.06.2023 01:34
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.