Заданный радиус основания и высоты цилиндра ю вычислить площадь основания и объем

1

Ответы и объяснения

2013-03-06T16:33:28+00:00

var
r,h,s,v:integer;
begin
readln(r,h);
s:=round(Pi*sqr(r));
v:=s*h;
writeln('S=',s);
write('V=',v);
end.