Составить программу, по которой определяется лежит ли точка с заданными координатами (x y) внутри заштрихованной области.
5-9 класс
|
Помогите пожалуйста!
для того чтобы точка принадлежала заданной области - её координата -3<X<0 и -3<y<0
программа на pascal
var X,Y :integer;
begin
write('введите координату Х');
readln(X);
write('введите координату Y');
readln(Y);
if (X>(-3)) and (X<0) and (Y>(-3)) and (Y<0) then write('точка принадлежит области')
else write('точка не принадлежит области');
end.
Другие вопросы из категории
кодировке равен 160 бит?
программы для чисел от 5 до 12
mas[1]:=12;
mas[2]:=43;
mas[3]:=48;
mas[4]:=56;
mas[5]:=76;
mas[6]:=73;
mas[7]:=36;
mas[8]:=96;
mas[9]:=69;
mas[10]:=25;
k:=0;
m1:=mas[1] div 10 - mas[1] mod 10;
for i:=2 to 10 do begin
m2:=mas[i] div 10 - mas[i] mod 10;
if m1 > m2 then begin
m1:=m2; k:=i;
end;
end;
write(k);
end.
А)клавиатура-микрофон
Б)река-Днепр
В)болт-чертеж болта
Г)мелодия-нотная запись мелодии
Д)весна-лето
Читайте также
Помогите пожалуйста, очень срочно надо!
а) определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и выводит его; в) выводит сначала фамилию, а затем имя. Задание 2. Составьте программу, которая в строке "Касіу Ясь канюшыну" заменяет имя "Ясь" на "Янка". Задание 3. Составьте программу, которая в строке "реки горы и болота": а) удаляет слово "горы"; б) Заменяет слово "болота" на "озера". Буду безмерно благодарна!!!