Hallo Bladerunn3r,
zunächst einmal herzlich willkommen in der Delphi Praxis.
Das mit dem Readln ist schon korrekt, aber füge es bitte zweimal ein.
Delphi-Quellcode:
program Project2;
{$APPTYPE CONSOLE}
Var a,b,c,x,E:Real;
Begin
Write('Stimmen fuer a=');
Read (a);
Write('Stimmen fuer b=');
Read (B);
Write('Stimmen fuer c=');
Read (c);
Write ('Anzahl der Kandidaten=');
Read (x);
E :=(a+b+c)/(x);
Writeln ('Durchschnitt= ',E:6:2);
Readln;
Readln
End.