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

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

Найти нужный

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

Выполните операцию сложения и умножении над двоичными числами с решением... ПОМОГИТЕ ПОЖАЛУЙСТА С ЗАДАНИЕМ! В ходе телевизионного шоу проводится смс-голосование: каждый телезритель отдат свой голос за одного из 12 артистов-уча... Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Напишите программу на Паскале.... Что такое принцип программного управления?... На рисунке изображена схема дорог, связывающих торговые точки А, Б , В , Г, Д, Е, Ж. По каждой дороге можно двигаться только в направлении, указанном...