В паскаль!!!!!!!!!!!!!!!!!
Пожалуйста) Program azatka; var v,s,h:real; Begin Writeln('Введите площадь основания'); Readln(s); Writeln('Введите высоту'); Readln(h); v:=(s*h)/3; Write('V=',v); End.
спасибо