Probleme mit FOR-Schleife

[DeddyH]

Und bei IntToStr statt FloatToStr?

[timmy19]

Zitat von DeddyH:

Und bei IntToStr statt FloatToStr?

Immernoch...

Ich versteh halt nicht, warum er es bei der Wurzel richtig macht, aber beim Quadrat nicht.

[DeddyH]

Zeig doch mal den ganzen Code, da stimmt doch was nicht.

[timmy19]

Zitat von DeddyH:

Zeig doch mal den ganzen Code, da stimmt doch was nicht.

Hier:

Delphi-Quellcode:

begin
For a := 1 to 25 do
  Begin
    Qva := sqr(a);
    ListBox2.Items.Add(IntToStr(i)+ ':' + FloatToStr(Qva));
  end;
end

Wie gesagt, bei der Wurzel funzts.

[DeddyH]

Ach, Du meinst vor dem Doppelpunkt? Dann ist das klar, da die Schleifenvariable a ist, Du aber i abfragst.

[timmy19]

Zitat von DeddyH:

Ach, Du meinst vor dem Doppelpunkt? Dann ist das klar, da die Schleifenvariable a ist, Du aber i abfragst.

danke.

So, ich häufe euch heute mit fragen.

Wie kann man das selbe von Oben mit selbst eingegebenen Zahlen machen?

Meine Idee ist das hier:

Delphi-Quellcode:

 procedure TForm1.Button4Click(Sender: TObject);
var Wamn: extended;
  i: Integer;
 Begin

  For i := m to n do
  begin
 m:= Edit1.Text
 n:= Edit2.Text
    Wamn := sqrt(i);
    ListBox1.Items.Add(IntToStr(i) +':' + FloatToStr(Wamn));

  end;

Jetzt sagt er mir aber:

Zitat:

Inkompatible Typen: 'Integer' und 'TCaption'

Wie kann ich das lösen?

[DeddyH]

Mit StrToInt (oder besser TryStrToInt oder IntToStrDef). Allerdings solltest Du Dir wirklich einmal den Crashkurs reinziehen, sonst wird das auf Dauer nix.

[Bummi]

Der Link zum Crashkurs ist in #7

[timmy19]

Hallo,

ich bin's nochmal.Kein Angst ich habe mir den Crashkurs (zumindest bisschen)durchgelesen.
Trotzdem komme ich mit den Fehlermeldung oft nicht klar.

Deswegen nochmal eine Frage zu dem Programm von gestern.

Ich möchte die Wurzel von n bis m ziehen

Der Code sieht bisher so aus:

Delphi-Quellcode:

For i := n to m do
  begin
 m:= StrToInt(Edit1.Text );
 n:= StrToInt(Edit2.Text );
    Wamn := sqrt(i);
    ListBox1.Items.Add(IntToStr(i) +':' + FloatToStr(Wamn));

  end;
  end;
  end.

Es kommt bei der Zeile "For i:= n to m do" die Fehlermedung hier:

Zitat:

Inkompatible Typen: 'Integer' und 'Extended'

Was ist hier mein Fehler? Ich zerbrech mir seit gestern Abend den Kopf darüber...

[DeddyH]

Wie sind m und n denn deklariert? Außerdem solltest Du diese besser vor Schleifenbeginn zuweisen.