Написать программу вычисления периметра трапеции, длины сторон которой вводятся с клавиатуры
Program chet; var a,b,c,d,p:real; begin readln(a); readln(b); readln(c); readln(d); p:=a+b+c+d; writeln('Пириметр равен:',p:2:2); end;