20 Янв 20150 КомментариевPascal Решение задачи Begin6 Условие задачи:Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c). uses PT4; var a, b, c, v, s: real; begin Task('Begin6'); read(a, b, c); v := a * b * c; s := 2 * (a * b + b * c + a * c); write(v, s); end. Поделиться: