Question

3. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V и площадь поверхности S.Справка: V = a∙b∙c, S = 2∙(a∙b + b∙c + a∙c)

Answer 1

var
  a,b,c,v,s: integer;
begin
  readln(a,b,c);
  v:= a*b*c;
  s:= 2*(a*b+b*c+a*c);
  writeln('v=',v,'  s=',s);
end.