float Psr )
{
float Vrms; // Значение эффективного напряжения
float Irms; // Среднеквадратичное значение тока
// Вычисления RMS значений из поступивших данных
Vrms = x/sqrt(2);
Irms = Vrms/R;
//Вывод данных на консоль
printf ("Vrms=%.3f\n", Vrms);
printf ("Irms=%.3f\n", Irms);
// Проверка тремя разными способами активной мощности
float P1 = Vrms * Irms;
float P2 = (pow(Vrms,2)) / R;
float P3 = (pow(Irms,2)) * R;
// Вывод полученных результатов
printf ("P1=%.3f\n", P1);
printf ("P2=%.3f\n", P2);
printf ("P2=%.3f\n", P3);
// Вычисление True RMS значения
Psr = sqrt( (pow(P1,2)+pow(P2,2)+pow(P3,2)) / 3);
// Вывод True RMS на консоль
printf ("Psr=%.3f\n", Psr);
return (Psr);
}