Напрмер.

данное число 5

1маша
2паша
3федор

1=4
2=4
3=5
вывод 3.
Вроде правильно написал, былбы сканер набросал бы на бумаге...

Добавлено (26.05.2009, 04:26)
---------------------------------------------

<вводим слова и сохраняем в массиве>
j=1
while (j<k) or (Len(words[j])<>n)
j=j+1
whend

if j<k
then <найдено слово с номером i - выводим>
else <слово не найдено>
endif

x - заданое число
FOR i=1 TO 10
вводим слово
IF <длина слова>=x
THEN выводим слово
next i

длину слова можно найти кажется с помощью функции LEN(<слово>)
только не уверен в правильности синтаксиса.

Добавлено (26.05.2009, 05:29)
---------------------------------------------

n - количество букв
k - количество слов
words - массив со словами
<вводим слова и сохраняем в массиве>
j=0
for i=1 to k
if Len(words[i])=n
then <найдено слово с номером i - выводим>
j=1
end if
next i

if j=0
then <слово не найдено>
endif

Программа выглядит несколько проще.

Забиваем цикл с 10 инпутбоксами для слов.

затем опять же цикл, в нем забиваем отсчет букв и попутно проверяем их оставшееся количество.
вывод слова.

примерно так, я это понял, но как это выразить в программном коде, понятия не имею...

тогда оператор AND а не OR.

Возможно, что нужно начинать с j=0, не знаю с какого номера начинается масив символов (строка). тогда проверяем условие j=n