Question

помогите пожалуйста, даю 30 баллов​

Answer 1

Ответ:

Объяснение:

1. var

x,y: integer;

begin

read(x);

if (x<6) then y:=sqr(sqr(x)) else y:=5*x;

write(y);

end.

2. var

x,y:real;

begin

read(x);

if (x<2) then y:=sqrt(sqr(x)) else

  if (x>2) and (x<10) then y:=ads(10*x) else

    if (x>10) then y:=sqr(sin(2*x));

write(y);

end.