profile
Опубликовано 6 лет назад по предмету Информатика от авровпрап

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

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