Var
s:string;
k,i:integer; {k-количество символов 'o',i-счетчик цикла}
begin
readln(s);
k:=0;
for i:=1 to length(s) do {цикл от 1 до длины строки}
if s[i]='o'
then k:=k+1;
writeln(k);
<span>end.</span>
/* program created programmer Abdurahimov AliAkbar */#include<iostream>#include<math.h><span>using namespace std;</span><span>int main()</span>{<span> int n , i;</span><span> cin >> n;</span><span> int a[n + 1];</span><span> cin >> a[n] >> a[n + 1];</span><span> for(i = n - 1; i >= 1; --i)</span><span> a[i] = a[i + 2] - a[i + 1];</span><span> cout <</span>< a[1] << " " << a[2];<span>return 0;</span><span>}</span>
82×2=164
164 больше чем 82
164+8=172