Question

длина ребра куба "a"(ввод с клавиатуры)
какова площадь его поверхности?
каков объём куба?
решить через программу pascal ABC

Answer 1

Программа во вложении.
Program qq;
var a,S,V:integer;
Begin
writeln('Введите длину ребра куба:');
read(a);
S:=6*a*a;
V:=a*a*a;
writeln('Площадь поверхности куба=',S);
writeln('Объем куба=',V);
end.