Задать вопрос
13 сентября, 08:22

Даны координаты двух противоположных вершин прямоугольника: (x1, y1), (x2, y2). Стороны прямоугольника параллельны осям координат. Найти периметр и площадь прямоугольника.

+3
Ответы (1)
  1. 13 сентября, 10:12
    0
    Program pryamougolnik;

    var x1, x2, y1, y2, a, b, s, p:real;

    begin

    write ('Введите координату х1 = ') ;

    readln (x1) ;

    write ('Введите координату y1 = ') ;

    readln (y1) ;

    write ('Введите координату х2 = ') ;

    readln (x2) ;

    write ('Введите координату y2 = ') ;

    readln (y2) ;

    a:=abs (x2-x1) ;

    b:=abs (y2-y1) ;

    p: = (a+b) * 2;

    s:=a*b;

    writeln ('Периметр прямоугольника P = ', p) ;

    writeln ('Площадь прямоугольника S = ', s) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Даны координаты двух противоположных вершин прямоугольника: (x1, y1), (x2, y2). Стороны прямоугольника параллельны осям координат. Найти ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы