Вопрос по информатике:
Напишите программу которая вводит натуральные числа а и б и выводит все простые числа в диапазоне от а до б. В паскале
- 25.07.2018 09:40
- Информатика
- remove_red_eye 15629
- thumb_up 13
Ответы и объяснения 1
//PascalABC.NET 3.1 сборка 1219 (от самих создателей)
function IsPrime(x: integer): boolean;
begin
var sqx := Round(Sqrt(x));
var i := 2;
while (i <= sqx) and (x mod i 0) do
i += 1;
Result := i > sqx;
end;
begin
Range(ReadInteger('a ='), ReadInteger('b =')).Where(IsPrime).Print;
end.
- 26.07.2018 13:15
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.