Question

Сделайте пожалуйста срочно
Написать программу:
Дан четырёхугольник с длинами сторон A,B,C,D
Написать программу вычисления периметра данного прямоугольника.
Длины сторон вводятся с клавиатуры.
Результат выводится на экран.

Answer 1

Ответ:

var a, b, c, d, p:Integer;

begin

readln(a);

readln(b);

readln(c);

readln(d);

p := a + b + c + d;

writeln(p);

end.