Зациклить программу,чтоб он выполнял данное действие n-ое кол-во раз например,ввел число,а он написал (простое или золотое) и опять просил ввести число function prost(n: integer): boolean; var i: integer; begin prost: =true; if n< 2 then prost: =false else for i: =1 to n div 2 do if ((n mod i)=0) and (i< > 1) then prost: =false; end; var n: integer; begin writeln ('введите число'); readln (n); if prost(n) then writeln ('простое') else writeln ('золотое'); end.

245

402

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

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

Freewomans

Информатика

4,6(6 оценок)

Function prost(n: integer): boolean; var i: integer; begin prost: =true; if n< 2 then prost: =false else for i: =1 to n div 2 do if ((n mod i)=0) and (i< > 1) then prost: =false; end; var n,k,n: integer; begin writeln ('введите n'); readln(n); for k: =1 to n do begin writeln ('введите число'); readln (n); if prost(n) then writeln ('простое') else writeln ('золотое'); end; end.

edakovagfffgg

Информатика

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

Function prost(n: integer): boolean; vari: integer; beginprost: =true; if n< 2 then prost: =false elsefor i: =1 to n div 2 do if ((n mod i)=0) and (i< > 1) then prost: =false; end; varn,k,j: integer; beginwriteln ('введите количество раз выполнения программы: '); readln(k); for j: =1 to k dobeginwriteln ('введите число'); readln (n); if prost(n) then writeln ('простое')else writeln ('золотое'); end; end.

prostooo202003

Информатика

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

Потому что экран монитора излучает свет, а краска на бумаге или "в стакане" - отражает свет. у струйных принтеров используется краски cmyk cyan magenta yellow которые при смешивании разные цвета. при печати все цвета одновременно близкий к черному цвет (поэтому для черного используют 4 краску, k - black). при излучении, red green blue белый свет.

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

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

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

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

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

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

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

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

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

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