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

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

Найти нужный

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

Продумайте, какими графическими образами можно проиллюстрировать: 1) виды информации по способу её восприятия человеком 2) свойства информации Найд... Очевидно что: 1) первоклассник, семиклассник и ученик 11 класса получают разную информацию из вашего учебника информатики; 2) каждый из семиклассников... Текстовый документ, состоящий из нескольких страниц, занимает на жёстком диске 84 Кбайт. На 1-ой страницу документа 48 строк по 64 символа в строке. К... Лабораторная работа № 12 Создание запросов 1. Закладка Запросы/Создать/Конструктор. 2. В окне Добавление таблиц добавить обе та... Помогите пожалуйста!что такое ВАЙП?заранее спасибо....