Четыре сопротивления 1, 2, 3, 4 соединены параллельно. Определить сопротивление соединения желательно на c++ но можно и на Паскаль

===== C++ 17 =====

#include <iostream>

using namespace std;

int main()

{

   double r1, r2, r3, r4, z1, z2, z3, z4;

   cin >> r1 >> r2 >> r3 >> r4;

   z1 = 1 / r1;

   z2 = 1 / r2;

   z3 = 1 / r3;

   z4 = 1 / r4;

   double z = z1 + z2 + z3 + z4;

   double r = 1 / z;

   cout << "R = " << r;

   return 0;

}