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

//прога на Pascal`e
var
a, b, h : double;
begin
write ('Введите a, b, h: ');
readln (a, b, h);
writeln ('Площадь поверхности: ', 2*(a*b+a*h+b*h), ' ед^2;');
write ('Объем: ', a*b*h, ' ед^3');
end.