Найдите самый маленький натуральный делитель числа х, отличный от 1 (2< =х< =30000). входные данные выходится натуральное число выходные данные выведите наименьший делитель числа х, отличный от 1 примеры входные данные 2 выходные данные 2

btsakhaev btsakhaev    1   15.07.2019 14:30    1

Ответы
Эхэхэхэххэ Эхэхэхэххэ  03.10.2020 04:52
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика