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

Входные данные
Вводится натуральное число x.

Выходные данные
Выведите наименьший делитель числа x, отличный от 1.

Примеры
входные данные
2
выходные данные
2
входные данные
6
выходные данные
2

// PascalABC.NET 3.1, сборка 1256 от 21.06.2016var  i,x:integer;  found:boolean;begin  Read(x);  found:=false;  for i:=2 to x div 2 do    if x mod i=0 then begin Write(i); found:=true; break end;  if not found then Write(x)end.

//Pascal ABC.NET 3.1 сборка 1256Var x,i:integer;beginreadln(x);i:=2;while x mod i<>0 doi:=i+1;writeln(i);end.Пример ввода:15Пример вывода:3