Есть ли в предложении слова начинающиеся с заглавной буквы - Pascal
Формулировка задачи:
Цель: разработать программу исходного предложения на русском языке (из 50-80 знаков в котором слова отделяется друг от друга пробелами) с целью определения, есть ли в предложении слова начинающиеся с заглавными буквами.
И вот тут я кароче не понимаю что и как делать, заранее спасибо
Решение задачи: «Есть ли в предложении слова начинающиеся с заглавной буквы»
textual
Листинг программы
- var s:string;
- i,k:byte;
- ..........................
- i:=1;
- k:=0;
- while(i<length(s))and(k=0) do
- if(s[i] in ['A'..'Z','А'..'Я','Ё'])and((i=1)or(s[i-1]=' '))then k:=1
- else inc(i);
- if k=0 then write('Таких слов нет')
- else write('Такие слова есть');
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
