Площадь крышки бака вычисляется по формуле pd2, площадь обЪема по формуле pdh составить задачу в приложении паскаль abc
var d,p,h:real;
begin
readln(d,h);
p:=3.14;
writeln('Площадь бака ', p*d*h)
d:=d*d
writeln('Площадь крышки ', p*d);
end.