Question

умоляю помогите, срочно нужно:((​

Answer 1

Ответ:

programm 1;

uses crt;

var

x,y: real;

begin

read(x);

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

if (x>6) then y:=5*x;

write (y);

end.

programm 2;

uses crt;

var x,y:real;

begin

read(x);

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

if (x>2) and (x<10) then y:=abs(10*x);

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

write (y);

end.

Объяснение: