|
Registriert seit: 31. Jul 2003
Ort: Dresden
1.386 Beiträge
Delphi 7 Architect
|
Re: Konsolen Anwendung
20. Nov 2003, 20:41
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;
End.
So meinte ich das!
- ciao neo -
Es gibt niemals dumme Fragen, sondern nur dumme Antworten!
|