Исправить) в 5 строке пишет, что ожидалось константное выражение, не знаю как исправить uses crt; var v1,v2,v,r1,r2,r,h : real; const pi=3.14 ; write=('r1='); readln=(r1); write=('r2'); readln=(r2); write=('h='); readln=(h); v1= ((pi/3) * h*((r1*r1)+r1*r2+(r2* ; v2= (h/3 * pi * r*r); v= v1-v2 ; writeln =(v); begin ; end.