Question

Помогите с заданием по паскалю

Answer 1

Ответ:

var

x,y:real;

begin

readln(x,y);

if (y<=1.0) and (y>=-2.0*x-1) and (y>=2.0*x-1) then writeln('In section')

else writeln('Not in section');

readln;

end.

Объяснение: