Дано некоторый текст, в котором есть хотя бы одна запятая. Определить порядковый номер последней запятой в тексте

@keytgrd · Регистрация: 21.02.2014

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

@Puporev · 09.03.2014, 07:43

Pascal

var s:string;
    i,k:byte;
begin
writeln('Введите текст, содержащий запятые');
read(s);
k:=0;
i:=length(s);
while(i>=1)and(k=0)do
if s[i]=',' then k:=i
else i:=i-1;
write('Порядковый номер последней запятой=',k)
end.

@keytgrd 1 / 1 / 0 Регистрация: 21.02.2014 Сообщений: 40
		1
	Дано некоторый текст, в котором есть хотя бы одна запятая. Определить порядковый номер последней запятой в тексте 09.03.2014, 04:04. Показов 1480. Ответов 1 Метки нет (Все метки) Дано некоторый текст, в котором есть хотя бы одна запятая. Определить порядковый номер последней запятой в тексте 0

Опции темы

Дано некоторый текст, в котором есть хотя бы одна запятая. Определить порядковый номер последней запятой в тексте

Решение