Написать программу, которая по введённой с клавиатуры длине ребра куба вычисляет его диагональ, объём и площадь поверхности. Сделать нужно в PASCAL ABC

var a: real;

begin

write('введите длину стороны куба: ');

readln(a);

writeln('диагональ: ',a*sqrt(3));

writeln('объем: ',a*a*a);

write('площадь поверхности: ',6*a*a);

end.