Пишу в среде Delphi, но не суть.
Вот скриншот задания (№2, тот что с совмещенными квадратами)
У меня есть пример кода, но формула (z:=) написана для окружности, а как написать для квадрата, не пойму. (так же приложу скрин, для которой написан код ниже) Помогите пожалуйста)
BEGIN
WRITELN(' Type coordinates of the point X and Y:');
READLN(X3,Y3);
Z:=X3*X3+Y3*Y3;
IF ( Z>=1 ) AND ( Z<=4 )
THEN WRITELN ('Point is IN the region')
ELSE WRITELN ('Point is OUT of the region');
END.
Вот скриншот задания (№2, тот что с совмещенными квадратами)
У меня есть пример кода, но формула (z:=) написана для окружности, а как написать для квадрата, не пойму. (так же приложу скрин, для которой написан код ниже) Помогите пожалуйста)
BEGIN
WRITELN(' Type coordinates of the point X and Y:');
READLN(X3,Y3);
Z:=X3*X3+Y3*Y3;
IF ( Z>=1 ) AND ( Z<=4 )
THEN WRITELN ('Point is IN the region')
ELSE WRITELN ('Point is OUT of the region');
END.