Question

Помогите
Паскаль.......

Answer 1

1.
Program ex;
var l,v,s: real;
Begin
writeln('введите длину ребра куба:', l);
readln(l);
v:=l*l*l;
s:=sqr(6*l);
writeln('объем куба:', v);
writeln('площадь поверхности куба: ', s);
END.
2. см.картинку