Кокова позиция буквы "о" в члове "слон" (решить в pascal).

vikakocherzhuk vikakocherzhuk    1   08.06.2019 06:20    0

Ответы
Milanaмилана Milanaмилана  07.07.2020 14:53
Вот
var 
s,x      : string; 
 i,d,krot : longint;
begin 
readln(s); 
x:='о'; 
krot:=0; 
d:=length(s); 
for i:=1 to d do 
   if pos(x,s[i])<>0
     then writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика