Записать программу формирования и выделения n элементов паскаль n< =1000 первые n простых чисел
276
413
Ответы на вопрос:
Function simple(a: integer): boolean; begin result : = true; for i: integer : = 2 to (a div 2) do if (a mod i = 0) then begin result : = false; break; end; end; const n = 10; var i: longint : = 1; j: longint; a: array [1..n] of longint; begin while (a[n] = 0) do begin while (a[i] = 0) do begin j += 1; if (simple(j)) then begin a[i] : = j; end; end; i += 1; end; for i : = 1 to n do write(a[i], ' '); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
haylayjonesty13.03.2022 01:31
-
roman1978197514.10.2022 11:55
-
marisha16819.10.2022 17:31
-
Anvar66608.02.2022 03:45
-
gyukk08.01.2022 01:25
-
Klimg29.12.2021 06:25
-
HimikHEH22.02.2023 21:02
-
Маша1234567890111113.04.2020 21:53
-
сауле4915.02.2023 15:33
-
rainbiwcat750KO26.02.2021 20:17
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.