👤

rog sa ma ajutati sa gasesc greseala la acest program
Program CVTC;
const P,R,H; real;
begin
readln(R,H);
v:=1/3*P*sqr(R)+H;
writeln (v);
end