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

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

Найти нужный

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

Какой символ имеет код 67 в таблице ASCII?... Дано А = A716, B = 2518. Найдите сумму A + B. Ответ укажите в двоичной системе.... В договоре с провайдером сказано, что скорость интернета составит до 100 Мбит/c. У Артёма отображается максимальная скорость в 8 Мбайт/c. Посчитай. 2... графический файл содержит черно-белое изображение размером с 16 градациями серого цвета размером 10х10 точек Какой объем этого файла?... сколько цветов будет содержать палитра,если на один пиксель отводится 4 бита памяти? Для кодирования одного из цветов палитры служит двоичный код 001....