Kyusehokl
5 год назад
Определить объем и площадь боковой поверхности параллелепипеда для данных вводимых с клавиатуры a, b и h. нужно сделать в паскале, помогите пожалуйста.
ОТВЕТЫ
Лодыгин
Jun 30, 2019
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.
a, b, h : integer;
Begin
readln(a, b, h);
Writeln(V = , a * b * h);
Writeln(S = , (a * b + a * h + b * h) * 2);
End.
217
Смежные вопросы:
