von 1 bis 10 zählen und ergbnis anzeigen lassen

[Funky-Sepp]

Probiers mal so:

Code:

var i,a:integer;
begin
  i:=1; a:=0;
  while i<=10 do begin // du hast hier dein begin vergessen und du musst kleiner gleich benutzen
    a:=a+i;
    i:=i+1;
  end;
  label1.caption := IntToStr(i); // und hier muss der Integer noch in einen String umgewandelt werden.
end;

Der Compiler gibt dir immer verschieden Typen von Nachrichten aus:
- Warnung // Da könnte etwas zu einem Fehler führen
- Hinweis // sind z. B. var's die du gar nicht benutzt.
- Fehler // irgendein Syntaxfehler, so dass das Programm nicht kompiliert werden kann.

und dein auf a zugwiesener Wert müsste in dem Fall ein Hinweis sein.
Er kann das Programm zwar trotzdem erzeugen, gibt diesen Hinweis aber aus weil du den Wert in der Variable a gar nicht weiterbenutzt.

Hoffe ich konnte dir helfen.