Решите две программы s=(a+b)*h/(типо дробь)2 y=2x’2(типо маленькая 2 сверху)+4abc

S=(a+b)*h/(типо дробь)2

//_

Var a,b,h,s:real;

Begin

Read(a,b,h);

S=(a+b)*h/2;

Write(s);

End.

y=2x’2(типо маленькая 2 сверху)+4abc

//

Var x,y,a,b,c:real;

Begin

Read(x,a,b,c);

Y=2*x*x+4*a*b*c;

Write(y);

End.