Составить слово из первых букв слов предложения

@icorf · Регистрация: 21.09.2011

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

Народ, буду оч признателен, если пожите с следующей задачей.. Среда turbo pascal. Вводится любое предложение, и составляется слово из первых букв слов этого предложения. Пример: мама мыла раму. получаем: ммр. Кто чем может помогите плиЗзз.

@!.Ap0$T0L.! · 04.10.2011, 22:19

Pascal

var n,i:integer;
  st,s1:string;
begin
  readln(st);
  n:=length(st); {длина строки}
  s1:=s1+st[1];
  for i:=2 to n do
    if st[i-1] =' ' then s1:=s1+st[i];
  writeln(s1);
end.

нажми спасибо ))

Комментарий модератора

нажми спасибо ))

А вот это Правила запрещают, за что выдал предупреждение.

@icorf · 05.10.2011, 10:09 **[ТС]**

Дружище, спасиб те большое. Ток, ты не мог бы мне пояcнить вот этот отрывок кода:

s1:=s1+st[1]; - сдесь ты присваиваешь первый символ строки переменной S1 ?
for i:=2 to n do цикл начинается с 2 , так как первый символ уже присвоен?
if st[i-1] =' ' then s1:=s1+st[i]; а вот это ваще не понимаю(((
Подскажи, если не внапряг.. А так спасибо большо конечно)

@!.Ap0$T0L.! · 05.10.2011, 21:22

Сообщение от icorf

if st[i-1] =' ' then s1:=s1+st[i]; а вот это ваще не понимаю

это значит что есле перед буквой пропуск то мы к второй строке добовляем символ из первой который после пропуска

@icorf · 06.10.2011, 10:39 **[ТС]**

Спасиб мужик еще раз) И вот последние.. st[i-1] почему i-1, а не просто i?

@Puporev · 06.10.2011, 12:56

Сообщение от icorf

почему i-1, а не просто i?

Да потому что перед st[i], читать не умеешь?

@icorf 0 / 0 / 0 Регистрация: 21.09.2011 Сообщений: 25
		1
	Составить слово из первых букв слов предложения 04.10.2011, 19:59. Показов 4532. Ответов 5 Метки нет (Все метки) Народ, буду оч признателен, если пожите с следующей задачей.. Среда turbo pascal. Вводится любое предложение, и составляется слово из первых букв слов этого предложения. Пример: мама мыла раму. получаем: ммр. Кто чем может помогите плиЗзз. 0

@icorf 0 / 0 / 0 Регистрация: 21.09.2011 Сообщений: 25
	05.10.2011, 10:09 [ТС]	3
	Дружище, спасиб те большое. Ток, ты не мог бы мне пояcнить вот этот отрывок кода: s1:=s1+st[1]; - сдесь ты присваиваешь первый символ строки переменной S1 ? for i:=2 to n do цикл начинается с 2 , так как первый символ уже присвоен? if st[i-1] =' ' then s1:=s1+st[i]; а вот это ваще не понимаю((( Подскажи, если не внапряг.. А так спасибо большо конечно) 0

@!.Ap0$T0L.! 39 / 39 / 28 Регистрация: 01.12.2010 Сообщений: 126
	05.10.2011, 21:22	4
	Сообщение от icorf if st[i-1] =' ' then s1:=s1+st[i]; а вот это ваще не понимаю это значит что есле перед буквой пропуск то мы к второй строке добовляем символ из первой который после пропуска 1

@icorf 0 / 0 / 0 Регистрация: 21.09.2011 Сообщений: 25
	06.10.2011, 10:39 [ТС]	5
	Спасиб мужик еще раз) И вот последние.. st[i-1] почему i-1, а не просто i? 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	06.10.2011, 12:56	6
	Сообщение от icorf почему i-1, а не просто i? Да потому что перед st[i], читать не умеешь? 0

Составить слово из первых букв слов предложения

Решение