Является ли X простым числом.Pascal ABC.NET

1 ответ

Посмотреть ответы

Megamozg

2205

Если x - простое, выводим True

// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
var x:=ReadInteger('x=');
Writeln(Range(2,Round(sqrt(x))).All(i->x mod i<>0))
end.

Тестовое решение:
x= 191
True

Хороший ответ

17 декабря 2022 21:07

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Напишите значение буквы D в понятии 3D-модель... vera... Кратко 1.Что такое форматирование и для чего оно нужно? 2.Как открыть окно Формат ячеек? 3.Какие вкладки есть в окне Формат ячеек?... C++ как записать эту программу? Напишите функцию bool f(int x, int y), которая возвращает true, если x делится нацело на y, или наоборот, y делится н... Какой вариант верный? При задании параметров страницы в текстовом редакторе устанавливаются а) поля, ориентация и размер страницы; б) интервал между...