Предмет: Информатика,
автор: блонди7
Составить визуальные разветвленные алгоритмы для следующих задач. Определить является ли точка с координатами X,Y точкой пересечения диагоналей квадрата со стороной R ,одна вершина которого расположена в начале координат.
Ответы
Автор ответа:
0
program n1;
uses GraphABC;
var x1,y1,R:integer;
x,y:real;
begin
writeln('Введите размер стороны');
read(R);
x:=R/2;
y:=R/2;
setwindowsize(800,600);
setpenwidth(3);
rectangle(0,0,R,R);
line(0,0,R,R); line(0,R,R,0);
writeln('Введите координаты точки x и y');
read(x1,y1);
if (x1=x) and (y1=y) then
writeln('Является')
else writeln('Не является');
end.
Похожие вопросы
Предмет: Русский язык,
автор: yapthets00
Предмет: Химия,
автор: usatkinaludmila4
Предмет: Биология,
автор: Аноним
Предмет: Геометрия,
автор: ИРЕКНКЕ
Предмет: Алгебра,
автор: поинт8бланк