Любая последовательность буквенно-цифровых символов, например, «америка», «emp1234» и т. Д., Является примером строки. Подсчет символов является самым основным из всех строковых процессов. Ответ на вопрос «длина строки» abc12ef дается следующей процедурой —
to stringlength :s make "inputstring :s make "count 0 while [not emptyp :s] [ make "count :count + 1 print first :s make "s butfirst :s ] print (sentence :inputstring "has :count "letters) end
В приведенной выше процедуре ‘s’ — это переменная, содержащая входную строку. Переменная inputtring содержит копию входной строки. Счетчик переменных инициализируется с 0. В цикле while условие проверяет, стала ли строка пустой или нет. В каждом счетчике цикла переменная увеличивается на 1 для хранения счетчика длины. Оператор print first: s , печатает только первый символ строки, хранящейся в ‘s’.
Оператор make «s butfirst: s , извлекает подстроку, исключая первый символ. После выхода из цикла while мы напечатали количество символов или длину входной строки. Ниже приведено выполнение и вывод кода ,