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

Var x:Integer;
Begin Write(Введите число: ); 
Read(x); 
If x mod 2 = 0 Then WriteLn(Число простое)               
                     Else WriteLn(Число не имеет общих делителей);
End.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.