Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Опредилите является ли сисло простым?

Эльмира ---Жиганшина Ученик (152), на голосовании 15 лет назад
блок схема и програмирование в паскале
Дополнен 15 лет назад
Является ли число простым?
Голосование за лучший ответ
Азазелло 1 Мастер (1138) 15 лет назад
если число делится только на себя и на 1.
Пример: 0,1,2,3,5,7,11,17,...
Пусть ввели число 17!
счетчик=0
в цикле:
делим на [ 1;16 ], т. е. от единицы и до n-1
если остаток от деления =0, тогда счетчик=счетчик+1

выйдя из цикла:
если счетчик=2, следовательно простое, по-другому - нет!
fekla deineka Гуру (3331) 15 лет назад
function is_simple(number: integer): boolean
var k:integer;
begin
is_simple:=true;
for k:=2 to number-1 do
begin
if number mod k = 0 then is_simple:=false;
end;
end;
Похожие вопросы