В паскале выдать на экран все номера позиций , на которых встречается буква "к" пожалуйста помогите))
В паскале выдать на экран все номера позиций , на которых встречается буква "к"
пожалуйста помогите))
Гость
Ответ(ы) на вопрос:
Гостьvar s: string;
i:integer;
begin
write('Введите текст: ');
readln (s);
for i:=1 to length(s) do
if s[i]='к' then write (i,' ');
end.
Не нашли ответ?
Похожие вопросы