Дана длина ребра куба. Найти объем куба и площадь его боковой поверхности. Pascal

Var    a: real;

begin   
    write(Введите сторону куба = );
    readln(a);
    writeln(Объем = , a * a * a);
    writeln(Площадь поверхности = , 6 * a * a);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.