
Никита
6 год назад
Составьте программу,которая печатает true,если точка с координатами
ОТВЕТЫ

Артур
Oct 24, 2020
Var x, y: real;║
begin - Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((y >= 0) and (y <= x + 4) and (y <= 4 - x))end.
var x, y: real;║
begin - Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((x >= 0) and (y >= x - 6) and (sqr(x) + sqr(y) <= 36))end.
begin - Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((y >= 0) and (y <= x + 4) and (y <= 4 - x))end.
var x, y: real;║
begin - Write('Введите через пробел координаты точки (x,y): '); Readln(x, y); Writeln((x >= 0) and (y >= x - 6) and (sqr(x) + sqr(y) <= 36))end.
855