Впаскале выдать на экран все номера позиций , на которых встречается буква "к" ))

AlinaVaisberg AlinaVaisberg    1   17.06.2019 00:30    1

Ответы
рыжик59 рыжик59  02.10.2020 03:01
Var s: string;
i:integer;
begin
write('Введите текст: ');
readln (s);
for i:=1 to length(s) do
if s[i]='к' then write (i,' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика