//PascalABC.Net 3.2.0.1467
begin
var h := ReadlnReal(Высота =);
var w := ReadlnReal(Ширина =);
var l := ReadlnReal(Длина =);
Println(Площадь поверхности = , 2 * (w * h + w * l + h * l));
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.