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

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

Задать свой вопрос
1 ответ
Вот
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])lt;gt;0
     then writeln(i);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт