Даны координаты двух противоположных вершин прямоугольника(х1,у1),(х2,у2).
Стороны прямоугольника параллельны осям координат.Найти периметр и площадь
Var x1,x2,y1,y2,p,s:integer;
beginwrite(Введите x1 и y1);Readln(x1 , y1);write(Введите x2 и y2);Readln(x2 , y2);p:= abs((x2 - x1))*2 + abs((y1 -y2))*2;s:= abs((x2 - x1))* abs((y1 -y2));write(Введите x1 и y1,x1:4 , y1:4);write( );writeln(Введите x2 и y2,x2:4 , y2:4);writeln(Периметр = ,p);writeln(Площадь = ,s);end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
