Https://1drv.ms/p/s!AtuMHKY8XgZ9inRAcb_ky67EOwmO?e=mVLMNH
вступите в повер поинт
138
317
Ответы на вопрос:
Вот) модуль нужен, чтобы проверку) 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.
Популярно: Информатика
-
Дан одномерный массив из 30 элементов, составить программу для подсчета...
kim519455787831.01.2023 20:49 -
Автомобильный номер длиной 10 символов состоит из заглавных букв (всего...
Dimaa29927.06.2022 21:27 -
Який порядковий числівник відмінюється як прикметник м якої групи? сьомий...
СофияПодставкина12.11.2022 04:05 -
Задача 2. Получить таблицу значений функции y=x2 для x= от 20 до 1 с...
JuliaVolk0517.10.2022 06:32 -
Метод кодирования цезеря КЛЮЧ k=+3 млйюзлкгиргн ...
NoName228111114.12.2021 17:23 -
55.05 1)перевести число из десятичной системы счисления в двоичную 2)записать...
dumbschoolkid09.01.2023 18:54 -
=если(или(b28=b27; b28=b26); макс((b22)^3; (b23); (b24)^3; (b25)^(1/2))^3;...
Viky201629.03.2020 03:31 -
Какой спектр показан на рисунке? 1) сплошной спектр поглощения 2) линейчатый...
ОЛДВЖ07.04.2022 04:51 -
Мне до здачи осталось пол часа, но я не могу ответить на эти два во...
Ratatui34516.12.2022 11:08 -
Особенности строения толстой кишки (анатомия, студенческий уровень)....
EldarHolter06.11.2021 11:34