Найдите значение переменной х по тексту: n:=56; х:=4;
while n mod х <> 0 do
х:=х+1;
writeln(х):