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

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

16 декабря 2022 16:53

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

Найти нужный

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

Что такое обработка информации? Приходилось ли вам обрабатывать информацию? Приведите примеры.... Даю 50 баллов. помогите Сколько памяти на ноутбуке нужно освободить Артёму, чтобы перенести все свои файлы? Файлы: 1) «Мик и Рорти, S2E04», размер... в одной из ячеек электронной таблицы записано арифметическое выражение 50+25/(4*10-2)*8 Какое математическое выражение получится?... Какие виды программ можно выделить по их правовому статусу?... 2в 13 степени байтов сколько килобайтов...