Ich habs!
Delphi-Quellcode:
program Project2;
{$APPTYPE CONSOLE}
Var a,b,c,x,E:Real;
Begin
Write('Stimmen fuer a=');
Readln(a);
Write('Stimmen fuer b=');
Readln(B);
Write('Stimmen fuer c=');
Readln(c);
Write('Anzahl der Kandidaten=');
Readln(x);
E :=(a+b+c)/(x);
Writeln ('Durchschnitt= ',E:6:2);
Readln
End.
So ist es korrekt! Nach meinem Verständnis!
Wenn man nicht richtig hinschaut!