Question

определить объем и площадь боковой поверхности параллелепипеда для данных вводимых с клавиатуры a, b и h. нужно сделать в паскале, помогите пожалуйста.

Answer 1

var
a, b, h : integer;
Begin
readln(a, b, h);
Writeln('V = ', a * b * h);
Writeln('S = ', (a * b + a * h + b * h) * 2);
End.