|
#1
|
|||
|
|||
работа с текстом
1. Добавляет одну строку к другой.
2. Ищет в строке последнее вхождение заданного символа. 3. получает из строки новую, продублировав все гласные. 4. Подсчитывает количество слов в тексте. |
#2
|
||||
|
||||
1) memo.text := memo.text + ' Hello!';
|
#3
|
||||
|
||||
4)посчитать пробелы и прибавить 1. это если текст по правилам, нормально написан.
var str:string; wordcount:integer; for i:=0 to length(str) do if str[i]=' ' then inc(wordcount); inc(wordcount); //+1 |