Lösungen Kapitel 1

=======================================================================

Aufgabe 1.2	Kompensationsanlage:
  
PROGRAM PLC_PRG
(*Kompensationsanlage U,I,P-Werte zum Testen des Codes ändern*)
VAR
 r_U :REAL:= 230.0;(*Die Variable wird mit 230.0 initialisiert*)
 r_I :REAL:= 10.5; (*Testwert*)
 r_P :REAL:= 1500.0; (*Testwert*)
 r_S, r_lamda, r_Q :REAL;
END_VAR
(*Scheinleistung berechnen*)
r_S:= r_U * r_I;
(*Leistungsfaktor berechnen*)
r_lamda:= r_P / r_S;
(*Blindleistung berechnen*)
r_Q:= SQRT(EXPT(r_S,2)- EXPT(r_P,2));
_______________________________________________________________________
  
Übung 1.1	Volumenberechnung:
  
PROGRAM PLC_PRG
(*Volumen berechnen, rFuellhoehe- und rD-Werte zum Testen verändern*)
VAR
 rD :REAL:= 2.5;(*Tankdurchmesser mit 2.5 initialisiert*)
 rFuellhoehe :REAL;
 rV :REAL;(*Füllvolumen*)
END_VAR 
rV:= 3.14 * EXPT(rFuellhoehe,2) *(rD/2 – rFuellhoehe/3);

=======================================================================