Вводится предложение из пяти слов. Сделать, чтобы каждое слово начиналось с заглавной буквы

@Ирина Алейник · Регистрация: 24.06.2012

Author24 — интернет-сервис помощи студентам

@Владимир_ВМ · 25.06.2012, 04:38

Pascal

var
s:string;
i,j,n,m:integer;
begin
read(s);
write(upcase(s[1]));
for i:=1 to length(s) do
  if s[i]=' ' then write(upcase(s[i+1])) else write(s[i+1]);
end.

@Ирина Алейник 0 / 0 / 0 Регистрация: 24.06.2012 Сообщений: 25
		1
	Вводится предложение из пяти слов. Сделать, чтобы каждое слово начиналось с заглавной буквы 25.06.2012, 01:08. Показов 2097. Ответов 1 Метки нет (Все метки) Вводится предложение из пяти слов. Сделать, чтобы каждое слово начиналось с заглавной буквы 0

	25.06.2012, 04:38

Вводится предложение из пяти слов. Сделать, чтобы каждое слово начиналось с заглавной буквы

Решение