Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c) — Pascal(Паскаль)

program paral;
var v, a, b, c, s: real;
begin
    write('Введите значения a, b, c: ');
    readln(a, b, c);
    v := a * b * c;
    s := 2 * (a * b + b * c + a * c);
    writeln('Объем параллелепипеда -- ', v);
    writeln('Площадь поверхности параллелепипеда -- ', s);
end.