Составьте линейную программу на языке Паскаль. Найдите полную площадь боковой поверхности куба по заданной длине ребра. У куба шесть граней.

Предыдущий
вопрос Следующий
вопрос

program CubeSurfaceArea;

var
sideLength, surfaceArea: real;

begin
writeln('Enter the length of the cube side: ');
readln(sideLength);

surfaceArea := 6 sideLength sideLength;

writeln('The total surface area of the cube is: ', surfaceArea:0:2);
end.