Вопрос по информатике:
Напишите,пожалуйста, программу для Turbo паскаля,где вводится натуральное число и нужно определить является ли оно простым. вот блок-схема:
начало
ввод a
f:=0
for i:=2 to a-1 ; →f=0→да→'Простое'→нет→'не простое '
a mod i:=0 да→ f:=1
конец
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.12.2017 01:04
- Информатика
- remove_red_eye 5200
- thumb_up 30
Ответы и объяснения 1
Написал, как понял. Турбо Паскаля у меня нет, не проверял, но должно работать.
program zad1;
uses crt;
var a,i,f:integer;
begin
readln(a);
f:=0;
for i:=2 to a-1 do
if a mod i=0 then f:=1;
if f=0 then writeln('простое') else writeln('не простое')
end.
- 16.12.2017 02:06
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.