Информатика, опубликовано 2018-08-22 20:57:08 by Гость
Дано натуральное число определить является ли оно пррстым или составным?
Ответ оставил Гость
VAR
a, m, i: integer;
BEGIN
read(a);
for i:=1 to a do
if a mod i = 0 then m:=m+1;
if (m = 2) and (a 2) then write(число , a, простое)
else write(число , a, составное);
END.
вроде правильно, но проверь в паскале, а то у меня програмки нет на компе
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на