Вопрос по информатике:
Определить, является ли число, введенное с клавиатуры простым
В системе Паскаля
- 27.09.2017 22:23
- Информатика
- remove_red_eye 16644
- thumb_up 36
Ответы и объяснения 1
Var i,a:integer;
b:boolean:=true;
begin
write('Введите число = ');
readln(a);
for i:=2 to round(sqrt(a)) do
if a mod i = 0 then begin b:=false; break; end;
if b then writeln('Число ',a,' является простым')
else writeln('Число ',a,' не является простым')
end.
- 28.09.2017 02:08
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.