Question

Помогите пожалуйста, срочно

Answer 1

Ответ:

1) s=14.1371669411541 v=29.3215314335047

2)s=23.8761041672824 v=56.7581072748556

Объяснение:

var r1,r2,h,l,v,s:real;

begin

 writeln('введите r1');

 readln(r1);

   writeln('введите r2');

 readln(r2);  

 writeln('введите h');

 readln(h);  

 writeln('введите l');

 readln(l);

 s:=pi*(r1+r2)*l;

 v:=1/3*pi*h*(r1*r1+r2*r2+r1*r2);

 writeln('s=',s,' v=',v)

end.