Является ли 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

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

Найти нужный

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

Как называется компьютер компании Apple?... Сколько различных пятисимвольных слов можно записать с помощью алфавита состоящего из 0 и 1?... Согласны ли вы что понятие информации имеет контекстный смысл? Если да ,то покажите это в премерах... Информацию,достаточную для решения поставленной задачи,называют: а)полезной б)полной в)актуальной г)понятной... Определите результат работы программы, записанной на языке Python. for х in range(-2, 4) : у = abs (х) print(у)...