написать на с++! через if,else.swich

A:=3   - вместо переменной а будем ставить число 3
b:=2+a   - ставим вместо а число 3 и получим b=2+3=5,
                теперь вместо a будем ставить 3,
                а вместо b будем ставить число 5
a:=b*2*a   - ставим справа в выражение вместо a число 3,
                   а вместо b число 5, получим a=5*2*3=30
                   и это НОВОЕ значение переменной a! Теперь a=30, b=5
b:=2*a-b    - ставим справа в выражение вместо a число 30, а вместо b число 5, получим b=2*30-5=60-5=55, и это НОВОЕ значение переменной b!
ответ: b=55

Var m,j,r,n,sum,sumI,k:integer;C,b:Array[1..15]of integer;sr:real;Beginfor r:=1 to 15 do beginC[r]:= random(20)-10;  write(C[r]:4);if C[r] >0  then begin n := n +1;sum:= sum + C[r];end;if r mod 2 = 0  then begin k := k +1;sumI:= sumI + C[r];j:=j+1;b[j]:=C[r];end;end;writeln;writeln('Kоличество положительных',n:4);writeln('Cуммa положительных',sum:4);writeln('Cуммa элементов стоящих на четных местах',sumI:4);writeln('Cреднеарифметическое элементов стоящих на четных местах',sumI/k:4);foreach m in b dowrite(m:4);end.