Напишите программу, которая вводит координаты точки на плоскости и определяет, попала ли эта точка в заштрихованы область. Язык программирования Паскаль задания б и г

б)

program popb;

uses

crt;

var

x, y: real;

begin

writeln('Введите x, а затем y');

readln(x, y);

if (y <= (- x)) then

writeln('Точка попала в область')

else

WriteLn('Точка Не попала в область');

end.

г)

program popg;

uses

crt;

var

x, y: real;

begin

writeln('Введите x, а затем y');

readln(x, y);

if (((x - 1) * (x - 1) + y * y) <= 1) then

writeln('Точка попала в область')

else

WriteLn('Точка Не попала в область');

end.

2^i = 128

i = 7 бит

800 * 7 = 5600 бит

5600 : 8 = 700 байт

700 : 1024 = 0,684 килобайт.

1.способ.перепровляются 2 мальчика потом 1 мальчик возврощается и забирает 1 взрослого и переплывает с ним потом 1 мальчик возвращается и забирает второго взрослого.                                                                                                                   2.способ.сначало переправляются 1 мальчик и 1 взрослый потом этот мальчик переправляется и забирает второго взрослого а потом возвращается за вторым мальчиком и переправляется назад вместе с ним.