Cоставить блок-схему и написать программу нахождения площади (S) боковой поверхности куба. Длина (a) стороны куба вводится с клавиатуры.

var a, c: integer;beginwrite ('Введите длину ребра куба ');read (a);c:=6*sqr(a);writeln ('Площадь боковой поверхности куба равна ',c);end.