В слове, состоящем из трёх двухсимвольных слогов, опреде¬лять номер слога "ро". Если такого слога нет, то вывести соответствующее сообщение. желательно бы решение в Паскале
Answers & Comments
lucybvar s:string; k:integer;beginreadln(s); k:=pos('ро',s);if k<>0 then writeln(k div 2+1) else writeln('"ро" нет :(');writeln('Нажмите Enter для выхода'); readlnend.
Answers & Comments