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

ПРОШУ ПОМОГИТЕ ОЧЕНЬ СРОЧНО
Найдите самый маленький натуральный делитель числа x, отличный от 1 (2 <= x <= 30000).
Входные данные
Вводится натуральное число x.
Выходные данные
Выведите наименьший делитель числа x, отличный от 1.
Примеры
входные данные
2
выходные данные

  1. Ответ
    Ответ дан Аккаунт удален
    var x:integer;
    begin
       readln(x);
        for var i:=2 to x do
          if (x mod i)=0 then begin
            writeln('delitel: ',i);
            exit;
          end;
    end.
    1. Ответ
      Ответ дан HungerGames4yBaK
      если ты её не писал в var
Самые новые вопросы