Вопрос по информатике:
Помогите пожалуйста! Найти 100 первых простых чисел. Нарисовать блок-схему алгоритма к задаче
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 09.09.2015 03:44
- Информатика
- remove_red_eye 13152
- thumb_up 7
Ответы и объяснения 1
P.S inc - это увеличение переменной на единицу. Удачи по иформатике)
_____________________________________________________________
var i, k, c, pr: int64;
begin
k := 1;
pr := 0;
while pr < 100 do
begin c := 0;
for i := 1 to k do begin
if k mod i = 0 then inc(c) end;
if c = 2 then begin write(k, ' ');
inc(pr) end;
inc(k) end;
end.
- 01.01.1970 00:00
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.