Begin19. Даны координаты двух противоположных вершин прямоугольника: , . Стороны прямоугольника параллельны осям координат. Найти периметр и площадь данного прямоугольника.
Формулы:
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
program Begin19; var x1,y1,x2,y2,P,S: Real; begin Writeln('Введите значение координат певой точки прямоугольника: '); Write('Введите значение x: '); Readln(x1); Write('Введите значение y: '); Readln(y1); Writeln('Введите значение координат второй точки прямоугольника: '); Write('Введите значение x: '); Readln(x2); Write('Введите значение y: '); Readln(y2); P:=2*(abs(x1-x2)+abs(y1-y2)); Writeln('Периметр прямоугольника равен: ',P); S:=abs(x1-x2)*abs(y1-y2); Writeln('Площадь прямоугольника равна: ',S); end. |
Другие задачи из раздела Begin можно посмотреть здесь.
Здраствуйте,вот я не понял как это делается в математике ,в программирование все ок,просто хочу свои навыки прокачать в математике,не дадите сайт или какую ту информацию что бы потянуть математику ,мне очень нравится математика и программирование хотел как то по практиковаться чтобы на много лучшее было по данной книги практикуюсь (Адамян).