Страница 1 из 1
Работа со строками
Добавлено: 08 ноя 2012, 17:44
linnik
Дан текст(вводится с клавиатуры). Удалить в нём лишние пропуски(пробелы), оставить только по одному пробелу между слов. Определить сумму кодов всех парных слов, а также сумму кодов всех непарных слов. Помогите пожалуйста, кто-нибудь, очень надо!
Re: Работа со строками
Добавлено: 11 ноя 2012, 07:24
dr.Jekill
Создайте массив записей:
Код: Выделить всё
type TParseWord = record
s: String;
n: Integer;
ordsum: Integer;
end;
и заносите туда новые слова (неразрывные последовательности из символов ['A'..'Z','a'..'z']) или увеличивайте счетчик, если слово добавлено в массив ранее.