1.
a)
vary,x:real;beginread(x);y:=7*sqr(x) - 3*x +6;writeln(y);end.
б)
vary,a:real;beginread(a);y:=12*sqr(a) + 7*a - 16;writeln(y);end.
2.
varb,a,g:real;beginreadln(a);readln(b);g:=sqrt(a*a + b*b);writeln(g);end.