Помогите пж!! Инфа 10 кл Задана строка символов и отдельный символ. Определить на каком месте в строке впервые встречается такой символ.
Помогите пж!! Инфа 10 кл
Задана
строка символов и отдельный символ. Определить на каком месте в строке впервые
встречается такой символ.
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b:string;
begin
write('Введите строку: ');
readln(a);
write('Введите символ: ');
readln(b);
if pos(b,a)=0 then writeln('Символа ',b,' в строке нет') else writeln('Символ ',b, ' находится на ', pos(b,a), ' месте');
end.
Не нашли ответ?
Похожие вопросы