113.0
Объяснение:
const p=3.14;
var r,v:real;
begin
write ('Введите радиус шара: ');
readln (r);
v:=4/3*p*r*sqr(r);
write ('Объём шара ',v:0:1)
end.
r = int(input())
v = 3/4 * 3.14 * r**3
print(round(v, 1))
113.0
Объяснение:
const p=3.14;
var r,v:real;
begin
write ('Введите радиус шара: ');
readln (r);
v:=4/3*p*r*sqr(r);
write ('Объём шара ',v:0:1)
end.
r = int(input())
v = 3/4 * 3.14 * r**3
print(round(v, 1))