Дано целое число x, найти первое простое число,которое больше числа x. для решения составить логическую функцию, которая проверяет является ли данное число простым.
kapitoshka202
2
21.03.2019 06:35
1
Другие вопросы по теме Информатика
TraktoristGenadiy
11.02.2022 19:31
isakoksanka
26.11.2020 12:06
nellimatveeva
24.09.2019 00:30
МарысяДэн
21.07.2019 02:50
99669888Nina
21.07.2019 02:50
jak15
21.07.2019 02:50
katyaklimovich
21.07.2019 02:50
2006464
21.07.2019 02:50
Популярные вопросы
- Составь верные и не верные равенства используя таблицу...
3 - Реши пример 194815 + 206*(376200/495-193)-50*(48600/8)...
2 - Спишите текст расставляя пропущенные знаки припенания воздух как и...
1 - Прочитайте отрывок из труда «тарих-и рашиди» мухаммеда хайдара дулати...
3 - Причины или почему александр македонский смог покорить персидскую державу?...
3 - Найди ошибку в характеристике глаголов. исправь ее. шелестит,пишет,спорит...
3 - Найти площадь равнобедренной трапеции если большее основание равно...
2 - Нужно! 7 и 8 . желательно с рисунком....
2 - Проблема волы людини і можливості її досягнень у сучасних умовах за...
1 - Поезд шел 2 ч со скоростью 79,6 км/ч и 3 ч со скоростью 96,5 км/ч .найти...
3
var
i: integer;
begin
readln(i);
if (i mod 2<>0) and (i mod 3<>0) and (i mod 5<>0) and (i mod 7<>0) then
begin
writeln('Простое!');
end
else
begin
writeln('Нет!');
end;
end.