Составит программу вычисления значения выражения S=(a+b)*c/2
Program go ;Var a,b,c,S : real;BeginReadln(a,b,c);S:=(a+b)*c/2;Writeln(S);end.
спасибо