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

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

Найти нужный

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

Пусть a % b – это остаток при делении натурального числа a на натуральное число b. Тело функции F(n) задано следующими строчками и условиями: F(0... Эргономика- наука об эффективной организации рабочего места для безопасного труда, исходя из___________________________особенностей человеческого орга... Как посчитать среднее значение в таком формате 100,00 грн? У меня выдаёт ошибку. Нужно найти среднее значение с ячеек по этой формуле =СРЗНАЧ(B5:B10)... 1. Приведите примеры кодирования информации. 2. Закодируйте слово ХЛЕБ различными способами. 3. Найдите информационный объем пословицы в кодировке U... На изображении представлено задание, касающееся алгоритмов обработки символьных строк. Задание состоит из двух частей: 1. Построить блок-схемы д...