Составить блок-схему и нaписать программу на языке Паскаль для нажождения периметра произвольного четырехугольника, длины всех сторон вводятся с клавиатуры
Program n1; var a,b,c,d,p: real; begin readln(a,b,c,d); p:=a+b+c+d; writeln(p); end.