Вслове, состоящем из трёх двухсимвольных слогов, опреде¬лять номер слога "ро". если такого слога нет, то вывести соответствующее сообщение. желательно бы решение в паскале

Var s: string; k: integer; begin readln(s); k: =pos('ро',s); if k< > 0 then writeln(k div 2+1) else writeln('"ро" нет : ('); writeln('нажмите enter для выхода'); readln end.

Ip-адр.      217. 16. 246.  2 маска        255.255.252.    0 ад. сети    217.  16.  х    .  0 246=128+64+32+16+4+2 = 1111 0110 252=128+64+32+16+8+4=  1111 1100                                                                                 х=      1111 1100 =252 адрес сети 217.16.252.0                     b    c    f    h    <

#include < iostream> using namespace std; int main(){    int q;     cout< < "введите количество элементов массива"< < endl;     cin> > q;     int array[q];     int sum = 0;     for(int i = 0; i < q; i++)        {            cout< < "введите "< < i+1< < " элемент"< < endl;             cin> > array[i];         }    int i = 0;     while(i < q)    {        if(array[i] > 0){            break;         } else        {            sum+=array[i];         }        i++;     }    cout< < sum< < endl;     return 0; } вот