1
program number1;
var n,m:real;
begin write('Введите N ');read(n);
if n<=15 then m:=2*sqrt(n)else m:=n-3;write(m);<br>end.
2
program number2;
var a, b,c:real;
begin a:=5;b:=60;a:=b-sqr(a);if A>B then C:=A*B else C:=A/5+11;write(c);end.
3
program number3;
var m,n:real;
begin write('Введите n ');read(n);
m:=3.14+sqrt(n)+30; write('М= ',m);end.