Ввести слово, в котором содержится буква А, причем не на последнем месте. Вывести символ, следующий за А

@Anton_kolmykov · Регистрация: 03.12.2013

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

Ввести слово, в котором содержится буква А, причем не на последнем месте. Вывести символ, следующий за А.

@ermolay · 03.12.2013, 11:11

Pascal

1 2	for i:=1 to length(str)-1 do if str[i]='A' then writeln(str[i+1]);

Добавлено через 1 минуту
вот полное решение (в упрощенном виде):

Pascal

var
  str: string;
  i: integer;
begin
  write('Ââåäèòå ñòðîêó :');
  readln(str);
  for i:=1 to length(str)-1 do
    if str[i]='A' then writeln(str[i+1]);
  readln;
end.

@Anton_kolmykov · 03.12.2013, 11:12 **[ТС]**

ermolay, спасибо))))))

@ermolay · 03.12.2013, 11:13

да наздоровье! =)
зы, это для большой латинской А

@Anton_kolmykov 13 / 2 / 0 Регистрация: 03.12.2013 Сообщений: 128
		1
	Ввести слово, в котором содержится буква А, причем не на последнем месте. Вывести символ, следующий за А 03.12.2013, 10:31. Показов 1986. Ответов 3 Метки нет (Все метки) Ввести слово, в котором содержится буква А, причем не на последнем месте. Вывести символ, следующий за А. 0

@Anton_kolmykov 13 / 2 / 0 Регистрация: 03.12.2013 Сообщений: 128
	03.12.2013, 11:12 [ТС]	3
	ermolay, спасибо)))))) 0

@ermolay 3451 / 2389 / 2135 Регистрация: 04.12.2011 Сообщений: 3,966
	03.12.2013, 11:13	4
	да наздоровье! =) зы, это для большой латинской А 1

Опции темы