Задание 1. составьте программу, определяющую, является ли число х простым. число х введите с клавиатуры. число называется простым, если у него нет других делителей, кроме 1 и его самого.

Question

Информатика

Варюха

6 декабря, 12:16

Задание 1. составьте программу, определяющую, является ли число х простым. число х введите с клавиатуры. число называется простым, если у него нет других делителей, кроме 1 и его самого.

+2

Ответы (1)

Знаешь ответ?

Антонюшка · Answer 1

Var x:Integer;

Begin Write ('Введите число: ');

Read (x);

If x mod 2 = 0 Then WriteLn ('Число простое')

Else WriteLn ('Число не имеет общих делителей');

End.