var a: real;
begin
write('введите длину стороны куба: ');
readln(a);
writeln('диагональ: ',a*sqrt(3));
writeln('объем: ',a*a*a);
write('площадь поверхности: ',6*a*a);
end.
var a: real;
begin
write('введите длину стороны куба: ');
readln(a);
writeln('диагональ: ',a*sqrt(3));
writeln('объем: ',a*a*a);
write('площадь поверхности: ',6*a*a);
end.