Записать на языке Паскаля.

a2+b2 (в квадрате)

(s+p2)

x+y/2

15x-7/2

1)

var c, a, b: real;

begin

readln (a) ;

readln (b) ;

c: = (a*a+b*b) * (a*a+b*b) ;

writeln (c) ;

end.

2)

var c, s, p: real;

begin

readln (s) ;

readln (p) ;

c:=s+p*p;

writeln (c) ;

end.

3)

var c, x, y: real;

begin

readln (x) ;

readln (y) ;

c:=x+y/2;

writeln (c) ;

end.

4)

var c, x: real;

begin

readln (a) ;

c:=15*x+3,5;

writeln (c) ;

end.

Sqr (A*2+b*2)

(s+p*2)

x+y/2

15*x-7/2

Вроде так, если честно не очень понятно написан вопрос