Question

Нужно написать код для Паскаля
Условие: дан радиус шара найти объем. Нужно написать код так чтобы можно было подставить числа и получался ответ.

Answer 1

program world;

var R:real;

begin

 write('Введите радиус шара: ');

 readln(R);

 write('Объём шара: ',4*R*R*R*pi/3:0:2)

end.