Paskal найти среднюю линию трапеции m=a+b/2
написать программу для средней линии трапеции через вводимые а и б?
Var a,b,m :real;beginreadln(a);readln(b);m:=(a+b)/2;writeln(m);end.
var a,b,m :real; begin readln(a); readln(b); m:=(a+b)/2; writeln(m); end.