Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
17 декабря 2022 03:52
817
Является ли X простым числом.Pascal ABC.NET
1
ответ
Если 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
// 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
0
·
Хороший ответ
19 декабря 2022 03:52
Остались вопросы?
Еще вопросы по категории Информатика
ира потратила в книжном магазине 700 рублей на покупку книги она израсходовала 55 процентов этой сумме а на покупку блокнота потратила 10пооцентов. В...
package com.tetris.tetris;
import android.content.Intent;
import android.os.Bundle;
import android.support.v7.app.AppCompatActivity;
import andr...
Укажите количество итераций для каждого цикла: 1) for i in range (0,10,2): print(i) ...
Какие имена переменных недопустимы в языке Python: *несколько правильных ответов olga n 2@ $...
Составить программу сколько воскресений в 2022 году ...