64

Дано число А. Определить, является ли оно простым

mark-schultz 05 августа 2022

Дано число А. Определить, является ли оно простым (простое это натуральное число имеющие ровно два различных натуральных делителя: пшеницы и самосебя)

категория: информатика

41

Var a,i,k: integer; beginreadln (a); for i: =2 to a-1 doif (a mod i)=0 then k: =k+1; if k=0 then writeln ('Простое') else writeln ('Сложное'); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...