Тема (рекурсивные функции)

Задание: Произведение простых делителей числа n, меньших или равных n.

ПPOВЕРЬТЕ ПОЖАЛУЙСТА, правильно ли я выполнила задание.

f(n)=sq(n) П(i=1..n) (не sq(i -n)*не sq(f div (n,i)*i))+sq(f div (n,i))

Проверка (i=1..6)
f(5)=sq(n) П(i=1..5) (не sq(1 -5)*не sq(f div (5,1)*1))+sq(f div (5,1))*(не sq(2 -5)*не sq(f div (5,2)*2))+sq(f div (5,2))*(не sq(3 -5)*не sq(f div (5,3)*3))+sq(f div (5,3))*(не sq(4 -5)*не sq(f div (5,4)*4))+sq(f div (5,4))*(не sq(5 -5)*не sq(f div (5,5)*5))+sq(f div (5,5))=
1*((1*0*1)+1)*((1*0*2)+1)*((1*0*3)+1)*((1*0*4)+1)*((1*1*5)+0)=5

Машины Тьюринга

Реализовать выделение подстроки, заключенной между двумя символами (первая пара) в алфавите . Если последовательность отсутствует на ленте, стереть все.