Составить алгоритм для решения задачи: вычислить площадь поверхности прямоугольного параллелепипеда

program zz1;var a, b, c, S:real; // задаем переменные не целого типаbeginwrite(\'введите первую сторону прямоугольного параллелепипеда \');read(a); write(\'введите вторую сторону прямоугольного параллелепипеда \');read(b);write(\'введите третью сторону прямоугольного параллелепипеда \');read(c); s:=2*(a*b+a*c+c*b);// вычисляем площадь прямоугольного параллелепипеда по формуле write(\'площадь прямоугольного параллелепипеда = \',s:5:2); // выводим ответ в формате пять знаков для всего числа и два знака после точкиend.