запятая в строке

[Олег112]

Даны натуральное число n, символы s1..sn. Известно, что среди s1..sn есть хотя бы одна запятая. Найти такие натуральные i, что:
а)si - первая по порядку запятая
б)si - последняя по порядку запятая

[Mad_Cat]

i:=1;
while s[i]<>' ,' do inc(i);
j:=length(s);
while s[j]<>' ,' do dec(j);
writeln('a.',i,' b.',j);