Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Аллакот888
31.03.2022 14:36 •
Информатика
Написать программу которая проверяет является ли целое число введённое пользователем простым рекомендуемый вид экрана во время работы программы ниже даны введение выражающие полужирным шрифтом
Показать ответ
Ответ:
ВоСьМиКлAшKа
24.04.2020 03:00
Вот) Модуль нужен, чтобы упростить проверку)
var
x, i: integer;
begin
readln(x);
x := abs(x);
for i := 2 to x - 1 do
if x mod i = 0 then
begin
writeln('No');
exit;
end;
writeln('Yes');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Виталина111111111111
07.07.2022 00:43
1. пользователь вводит число: если число меньше 0 - вывести число отрицательное если число больше 0 - вывести число положительное если ввели 0 - число ни положительное,...
AnnLondonFencing
17.09.2020 21:12
Информатика 3 класс нужно выполнить задания ...
kirik2017
25.12.2020 21:14
Составьте программу для вычисления математических выражений, одновременно анализируя использование функций іnput() и рrint() в практических заданиях. 1) 352 · 985 · 25 ·...
хіха
17.03.2021 12:33
Информатика Что такое линейный алгоритм? 2.Какие датчики влияют на движение роботов?...
ясин9595
01.01.2023 17:39
1) 28 //5 2) 15 // 253) 65 7744) 22 // 22 -5) 100 // 20 и1) 26 % 262) 15 % 143) 36 % 144) 22 % З5) 89 % 201) (12 % 10) // 14-2) (15 // 14) % 13) (36 /10) % З4) (27 % 7)...
fty354y4
31.03.2023 18:10
1. Зачем добавляют закладки?Почему при поиске информации для презентациииспользуют Интернет?...
arino4ka3210
28.01.2022 17:59
На числовой оси х даны целые числа х1 и х2. Напиши программу вычисления расстояния между точками...
Anya2k17
03.06.2020 18:04
На числовой оси х даны целые числа х1 и х2. Напиши программу вычисления расстояния между точками с координатами х1 и х2. пример: 4, -8. результат: 12...
aijamalkamalova
04.05.2023 11:30
Велосипедист едет со скоростью 15 км/ч в течение 3 часов. Графиком зависимости расстояния, которое преодолел велосипедист, от времени будет 1 окружность 2 прямая 3 отрезок...
лиза1234567891011121
15.05.2022 08:21
1. Ввести текст Медвежонок. 2. Приведены слова. Найти слово в слове , отбросив одну-две буквы в начале или в конце каждого слова. Набрать полученные слова после исходных....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
x, i: integer;
begin
readln(x);
x := abs(x);
for i := 2 to x - 1 do
if x mod i = 0 then
begin
writeln('No');
exit;
end;
writeln('Yes');
end.