Найти общее сопротивление соединения,если 3 проводника соединены параллельно,и их сопротивления вводит пользователь. (var r1, r2, r3, r: real;

// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
  var r1,r2,r3:real;
  Write('Введите R1 R2 R3: '); Read(r1,r2,r3);
  var g:=1/r1+1/r2+1/r3;
  Writeln('R=',1/g:0:5)
end.

Тестовое решение:
Введите R1 R2 R3: 3.5 2.75 4
R=1.11191