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

1

Ответы и объяснения

2016-11-20T18:03:43+03:00
Var    a: real;

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