Логической переменной p присвоить значение true, если n (n>1) - простое число, и значение false иначе.
Примечание: у составного числа n обязательно есть делитель k из отрезка [2,sqrt(n)], он и ищется.
PLZ!!!!! срочно!!
http://forum.pascal.net.ru/index.php?s=&showtopic=3916&view=findpost&p=32236 - проверка, простое ли число