Найти номер позиции последней запятой

@Evgenij3 · Регистрация: 13.09.2016

Известно, что среди S1,...,Sn есть по крайней мере одна запятая. Найти такое натуральное i, что Si-Последняя по порядку запятая

@Puporev · 15.09.2016, 18:16

Pascal

var s:string;
    i:byte;
begin
readln(s);
i:=length(s);
while(i>=1)and(s[i]<>',') do dec(i);
write(i);
end.

@Evgenij3 0 / 0 / 0 Регистрация: 13.09.2016 Сообщений: 7
		1
	Найти номер позиции последней запятой 15.09.2016, 18:10. Показов 2048. Ответов 1 Метки нет (Все метки) Известно, что среди S1,...,Sn есть по крайней мере одна запятая. Найти такое натуральное i, что Si-Последняя по порядку запятая 0

Опции темы

Решение