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

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

Найти нужный

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

в бутылке стакане кувшине и банке находятся молоко лимонад квас и вода известно что вода и молоко не в бутылке сосуд с лимонадом стоит между кувшином... Какой из графических редакторов является векторным? 1)Adobe Photoshop 2)Corel Draw 3)Paint... Напишите программу, которая вычисляет квадратный корень введённого числа. Вычислите с её помощью квадратные корни из чисел 221841; 32005,21 и 15239,90... Ответьте на вопросы : 1. Приведите свои примеры профессий, в которых основным видом деятельности является работа с информацией 2. Назовите три основны... Помогите пожалуйста! Это Smath Studio...