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

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

Найти нужный

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

Музыкальный фрагмент был оцифрован и записан в виде файла без использования сжатия данных. Получившийся файл был передан в город А по каналу связи за... Перевести целые числа из десятичной системы счисления в двоичную,восьмеричную и шестнадцатеричную системы: а)856 б)664 в)5012 г)6435 д)78... 1.сколько цветов будет содержать палитра, если каждый базовый цвет кодировать двумя битами? 2.Какой объем видеопамяти в в кбайтах нужен для хранения и... Что такое мегамир , макромир ,микромир?... 1)чем отличается установка ос от загрузки ос 2)Выясните происхождение названия языка программирования Паскаль...