Perl :: Aufgabe #300
1 Lösung
Spannung, Stromstärke, Widerstand
Anfänger - Perl
von JKooP
- 04.10.2020 um 12:43 Uhr
Schreibe eine Methode/Funktion, die je nach Eingabe von 2 Werten den fehlenden Wert ermittelt.
Die möglichen einzugebenden Werte sind Spannung (U [Volt]), Widerstand (R [Ohm]) bzw. Stromstärke (I [Ampere]).
Der fehlende Wert kann null/nothing oder jedes andere beliebige Zeichen sein.
Die Formel zur Berechnung lautet: U = R * I
Beispiel:
U := 270.0
R := null
I := 3.0
R = I / U = 270 / 3 = 90.0 Ohm
Viel Spaß
Die möglichen einzugebenden Werte sind Spannung (U [Volt]), Widerstand (R [Ohm]) bzw. Stromstärke (I [Ampere]).
Der fehlende Wert kann null/nothing oder jedes andere beliebige Zeichen sein.
Die Formel zur Berechnung lautet: U = R * I
Beispiel:
U := 270.0
R := null
I := 3.0
R = I / U = 270 / 3 = 90.0 Ohm
Viel Spaß
Lösungen:
Perl-Code#!/usr/bin/perl
use strict;
use POSIX;
print getResult_URI( 270.0, undef, 3.0 )."\n"; # Ausgabe 90
print getResult_URI( undef, 90.0 , 3.0 )."\n"; # Ausgabe 270
print getResult_URI( 270.0, 90.0 , undef )."\n"; # Ausgabe 3
# U = R * I
# R = U / I
# I = U / R
sub getResult_URI{
my $volt = shift;
my $ohm = shift;
my $ampere = shift;
unless( defined $volt ){
return $ohm * $ampere;
}
unless( defined $ohm ){
return $volt / $ampere;
}
unless( defined $ampere ){
return $volt / $ohm;
}
}