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

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

Найти нужный

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

Какие три закона робототехники? Пожалуйста, срочно надо... При включении компьютера процессор обращается к… А) ОЗУ В) ПЗУ Б) винчестеру Г) дискете... symbol = '+' for k in range(4): print((4 - k) *... В чём суть процесса дискретизации информации?... Помогите расшифровать двоичный код, пожалуйста: 10010111 10000000 10010010...