Даны длина, ширина и высота прямоугольного параллепипеда, определить объем, площадь поверхности и длину всех рёбер. Помогите по написанию программы на  Pascal ABC

var   a, b, h, V, S, L: real; begin   Write('Задайте через пробел длину, ширину и высоту параллелепипеда: ');   Readln(a, b, h);   V := a * b * h;   S := 2 * (a * b + a * h + b * h);   L := 4 * (a + b + h);   Writeln('V=', V:0:4, ', S=', S:0:4, ', L=', L:0:4) end. Тестовое решение: Задайте через пробел длину, ширину и высоту параллелепипеда: 3 4.5 6.7 V=90.4500, S=127.5000, L=56.8000