Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
15 декабря 2022 21:07
917
Является ли X простым числом.Pascal ABC.NET
1
ответ
Если 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
// 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
0
·
Хороший ответ
17 декабря 2022 21:07
Остались вопросы?
Еще вопросы по категории Информатика
PYTHON 8класс!!!!Много баллов. ввести последовательно возраст Антона,Бориса и Виктора.Определить,кто из них старше....
1 Задача 3: Андрей и порталы Андрей вот-вот опоздает на школьный этап ВсОШ. К счастью, недавно в его городе появились порталы. Город, в котором живет...
Задача: Удаление символа Решить через С++ Дана строка. Удалите из этой строки все символы @. Входные данные Вводится строка. Выходные данные Вы...
помогите пожалуйста решить задачу несжатое растровое изображение размером 64 на 512 пикселей занимает 32 КБ памяти Каково максимально возможное число...
Что такое конфигурация компьютера?...