Слова.Есть(П1)

Описание:
Проверяет есть ли слово в массиве слов текущего хранилища, возвращает уникальное число.
Если слова нет, то возвращает 0.
П1 должно быть без пробелов и табуляции.
;

Результат=Возвращает число
;

Параметры:
П1 - строка состоящая из одного слова
;