allangarsk
№10 var x,y:integer;beginx:= 6;if (x >= (-2)) and (x <=5) then write('Нет решения')elsebeginif x > 5 then y:=x*x -1;if x < -2 then y:=2*x;write ('y =', y);end;end.
1 votes Thanks 1
allangarsk
var x:integer;y:real; begin x:= 6; if x >= 0 then begin y:= sqrt(2*x +1)/(20*x-5); write ('y =', y); end; end.
Answers & Comments
var x,y:integer;beginx:= 6;if (x >= (-2)) and (x <=5) then write('Нет решения')elsebeginif x > 5 then y:=x*x -1;if x < -2 then y:=2*x;write ('y =', y);end;end.
begin
x:= 6;
if x >= 0 then
begin
y:= sqrt(2*x +1)/(20*x-5);
write ('y =', y);
end;
end.