tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано число а. определить, является
Дано число а. определить, является ли оно простым (простое это натуральное число имеющие ровно два различных натуральных делителя: пшеницы и само себя)
мариатмими
1 24.05.2019 06:40
1
Ответы
lesta2
20.06.2020 02:33
Var a,i,k:integer;
begin
readln(a);
for i:=2 to a-1 do
if (a mod i)=0 then k:=k+1;
if k=0 then writeln('Простое')
else writeln('Сложное');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
PonyLove11
17.05.2021 16:14
Дан промежуток [0,48]. Вывести все числа из этого промежутка кратные 3. (Составьте блок-схему и разработайте код)...
ZigFinde
17.05.2021 16:16
Упрощенное представление об объекте. Это - ? Варианты ответовСубъектМодельОбъект3D модельМодельер...
опв4
17.05.2021 16:17
Решите поскорее. Заранее за грамотный ответ)...
длвшуаблв
12.05.2020 07:43
Нысандар мен оқиғаларды модельдеу бөлімі бойынша жиынтық бағалау...
npapriko
12.05.2020 07:43
Расположите по порядку оформление оглавления...
Scvetocheek1
12.05.2020 07:44
Задача №2 Три пирата: Нытик, Стрелец и Барс зарыли свои сокровища на одном острове. Один из них зарыл возле дерева лимона, другой – банана, а третий – абрикоса. Ёмкость для...
arinahomich05
12.05.2020 07:45
Определите и пронумеруйте очередность создания автооглавления.2)диалоговом окне «Оглавление» выберите параметры оглавления и нажмите ОК. Поместите курсор в пустой абзац в том...
ЛиляОлье1
12.05.2020 07:44
Айдару по информатике задали составить проект, при программировании задач ему необходимо придерживаться основных этапов разработки проектов Айдару определить и пронумеровать...
dmitrykim2000
18.12.2020 18:35
Укажите стандартные утилиты операционной системы для устранения ошибок, очистки и дефрагментации....
jdkdjdjjidjdjd
18.12.2020 18:35
Какова взаимосвязь между поколениями ЭВМ и периодами развития ПО?...
Популярные вопросы
При каких a система уравнений имеет три решения y-x^2=a; x^2+y^2=4...
3
Ma и mb - касательные. mo = 2 см. угол amo = 45 градусов. расстояние между...
3
решить два (2,4) из сборника за 9 класс. желательно в виде фото....
2
Однородный брус массой m=360г и длиной l=120см шарнирно закреплен на расстоянии...
2
Составить предложения на казахском с этими словами.(простые)...
2
«подобных слагаемых» 1. 5a + 3a. 2. 14x – 19x. 3. –m – m. 4. 5y – 2y – 7y....
1
Какие события заставили степняков откачивать к яику (жайыку)? ...
3
Hno3+nh3=n2+h20 расставить коэффициенты методом электронного . !...
1
Розкладіть на множники вираз -8a^5+8a^3-2a...
1
Углы при большем основании трапеции равны 28 и 62 . основания трапеции равны...
3
begin
readln(a);
for i:=2 to a-1 do
if (a mod i)=0 then k:=k+1;
if k=0 then writeln('Простое')
else writeln('Сложное');
end.