Помощь - Поиск - Пользователи - Календарь
Полная версия: Массив
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
@WARlock@
Подсчитать число слов начинающихся и заканчивающихся буквой a.
volvo
Поиск для тебя тоже существует. Ты не исключение!
@WARlock@
Так каким образом решить.
Ozzя
Разбить слова при помощи ф-ции getwords - см. FAQ
Цитата
начинающихся и заканчивающихся буквой a.

Код

var
  a:string;
...
if (a[1]='a') and (a[length(a)]='a') then ...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.