Решение

y:=2*sqr(sin(3*pi-2*x))*sqr(cos(5*pi+2*x));

z:=0.25-0.25*(sin(2.5*pi-8*x));

y:=cos(x)+sin(x)+cos(3*x)+sin(3*x);

z:=2*sqrt(2)*cos(x)*sin(pi/4+2*x);

y:=(sin(2*x)+sin(5*x)-sin(3*x))/(cos(x)+1-2*sqr(sin(2*x)));

z:=2*sin(x);

Похоже в примере опечатка, а код выглядит так:

y:=(((m-1)*sqrt(m))-((n-1)*sqrt(n)))/(sqrt(m*m*m*n)+n*m+m*m*m-m);

z:=(sqrt(m)-sqrt(n))/m;

y:=1-0.25*sqr(sin(2*x))+cos(2*x);

z:=sqr(cos(x))+sqr(sqr(cos(x)));

y:=cos(x)+cos(2*x)+cos(6*x)+cos(7*x);

z:=4*cos(x/2)*cos(2.5*x)*cos(4*x);

y:=sqr(cos(3/8*pi-x/4))-sqr(cos(11/8*pi+x/4));

z:=sqrt(2)/2*sin(x/2);

y:=sqr(sqr(cos(x)))+sqr(sin(y))+0.25*sqr(sin(2*x))-1;

z:=sin(x+y)*sin(y-x);

y:=sqr(cos(x)-cos(y))-sqr(sin(x)-sin(y));

z:=-4*sqr(sin((x-y)/2))*cos(x+y);

y:=(sin(pi/2+3*x))/(1-sin(3*x-pi));

z:=(cos(1.25*pi+1.5*x))/(sin(1.25*pi+1.5*x));

y:=(1-2*sqr(sin(x)))/(1+sin(2*x));

z:=(1-(sin(x))/(cos(x)))/(1+(sin(x))/(cos(x)));

y:=((sin(4*x))/(1+cos(4*x)))*((cos(2*x))/(1+cos(2*x)));

z:=(cos(1.5*pi-x))/(sin(1.5*pi-x));

z:=(1+sin(2*y))/(cos(2*y));

y:=(sin(x)+cos(2*y-x))/(cos(x)-sin(2*y-x));

y:=(cos(x)+sin(x))/(cos(x)-sin(x));

z:=(sin(2*x)/cos(2*x))+(1/cos(2*x));

при: b<-2 и b>2

y:=(sqrt(2*x+2*sqrt(sqr(x)-4)))/(sqrt(sqr(x)-4)+x+2);

z:=1/(sqrt(x+2));

при: b<-3 и b>3

y:=(sqr(x)+2*x-3+(x+1)*sqrt(sqr(x)-9))/((sqr(x)-2*x-3+(x-1)*sqrt(sqr(x)-9)));

z:=sqrt((x+3)/(x-3));

y:=(sqrt(sqr(3*x+2)-24*x))/(3*sqrt(x)-2/sqrt(x));

z:=-sqrt(x);

При: а>0

y:=((x+2)/(sqrt(2*x))-x/(sqrt(2*x)+2)+2/(x-sqrt(2*x)))*(sqrt(x)-sqrt(2))/(x+2);

z:=1/(sqrt(x)+sqrt(2));

при: а<>-2 и a<>2

y:=1/((1+x+sqr(x))/(2*x+sqr(x))+2-((1-x+sqr(x))/(2*x-sqr(x))))*(5-2*sqr(x));

z:=(4-sqr(x))/2;

Вариант 1

readln(x, y);

p:=x+y;

m:=x-y;

u:=x*y;

r:=x/y;

write('OTBET: summa= ', p:6:3, '; raznost= ', m:6:3, '; proiz= ', u:6:3, '; delenie= ', r:6:3);

Вариант 2

readln(x);

p:=sqr(x)*x;

m:=sqr(x);

write('OTBET: ob/em= ', p:6:3, '; ploshad bok poverh= ', m:6:3);

Вариант 3

readln(x, y);

p:=sqrt(sqr(x)+sqr(y));

m:=0.5*x*y;

write('OTBET: gipatinuza= ', p:6:3, '; ploshad= ', m:6:3);

Вариант 4

readln(x);

p:=x*0.57;

m:=x*0.23;

u:=x*0.08;

r:=x*0.12;

writeln('EDA= ', p:6:3, '; kommunalka= ', m:6:3);

write('razvlikuha= ', u:6:3, '; B KOPILKY= ', r:6:3);

Вариант 5

readln(x);

p:=(sqrt(3)*sqr(x))/4;

m:=(sqrt(3)*x)/2;

u:=x/(2*sqrt(3));

r:=x/sqrt(3);

writeln('S= ', p:6:3, '; h= ', m:6:3);

write('r= ', u:6:3, '; R= ', r:6:3);

Вариант 6

readln(x);

p:=sqr(x)/(4*pi);

writeln('S= ', p:6:3);

Вариант 7

readln(x, y);

p:=abs(pi*(sqr(x)-sqr(y)));

writeln('S= ', p:6:3);

Вариант 8

readln(x);

p:=trunc(x / 36)+1;

writeln('Pod/ezd= ', p:6:0);

p:=trunc((x-(36*(p-1)))/4)+1;

writeln('Etag= ', p:6:3);

Вариант 9

Я не понял условие! Объясните.

Вариант 10

readln(x,y);

p:=x+y+(sqrt(sqr(x)+sqr(y)));

writeln('Per= ', p:6:3);

p:=0.5*x*y;

writeln('S= ', p:6:3);

Вариант 11

readln(x);

p:=2*pi*x;

writeln('Dlina= ', p:6:3);

p:=pi*sqr(x);

writeln('S= ', p:6:3);

Вариант 12

readln(x);

if (x >=1000) and (x<=9999) then

begin

p:=(x div 1000)*(x mod 10)*(x mod 100 div 10)*(x div 100 mod 10);

writeln('Umnogenie= ', p);

end;

Вариант 13

readln(x,y,p,m);

p:=sqrt(sqr(p-x)+sqr(m-y));

writeln('PACCTORHUE= ', p:6:3);

Вариант 14

readln(x);

p:=sqr(x);

writeln('S(grani)= ', p:6:3);

p:=p*6;

writeln('S(poverh)= ', p:6:3);

p:=sqr(x)*x;

writeln('V= ', p:6:3);

Вариант 15

readln(x,y,m);

p:=x*y*sin(m);

writeln('S= ', p:6:3);

p:=2*(x+y);

writeln('P= ', p:6:3);

p:=x*sin(m);

writeln('Hb= ', p:6:3);

p:=y*sin(m);

writeln('Ha= ', p:6:3);

Вариант 16

readln(x);

y:=sqrt(sqr(x)/2);

p:=sqr(y);

writeln('S= ', p:6:3);

p:=4*y;

writeln('P= ', p:6:3);

p:=0.5*y;

writeln('r= ', p:6:3);

p:=0.5*x;

writeln('R= ', p:6:3);

Вариант 17

readln(a,b,c);

h:=(a-b)/2*(sin(c)/cos(c));

s:=0.5*(a+b)*h;

writeln('Ответ: площадь трапеции равна ',s:0:3);

Вариант 18

readln(x,y,m);

u:=sqrt(sqr(x)+sqr(y)-2*x*y*cos(m));

p:=x+y+u;

writeln('P= ', p:6:3);

p:=p/2;

p:=sqrt(p*(p-x)*(p-y)*(p-u));

writeln('S= ', p:6:3);

Вариант 19

p:=sqr(pi);

writeln('Pi2= ', p:6:3);

p:=sqr(pi)*pi;

writeln('Pi3= ', p:6:3);

p:=sqr(pi)*sqr(pi);

writeln('Pi4= ', p:6:3);