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

1 ответ

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

DevAdmin

1720

Если 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

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

19 декабря 2022 03:52

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

Найти нужный

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

Помогите пожалуйста нужно СРОЧНО! 1.Приведите примеры знаковых систем. Какова может быть физическая природа знаков? 2.В чем состоит различие между ес... Все заглавные буквы русского алфавита закодированы неравномерным двоичным кодом, в котором никакое кодовое слово не является началом другого кодового... В алфавите языка племени тумба-юмба 4 буквы: гласные О и А, согласные Ш и Щ. Вероятность их появления в тексте: А — 0,35, О — 0,4, Ш — 0,1, Щ — 0,15.... Как называется основной элемент электронной таблицы MS Excel?... Трассировочная таблица 4 задача...