Question

Помогите, прошу. Программа паскаль
Найти площадь шара, если его радиус равен 4 (S=4пr^2)

Answer 1

program abc;

const 
R = 4;
PI = 3.14;

var S: real;

begin
write('Площадь шара равна - ', 4*PI*R*R);
end.