Witam wszystkich programistów, ja jestem dopiero na początku długiej drogi by tworzyć programy dla własnych potrzeb. Proszę o pomoc w zastąpieniu pętli for..step..until..do do delphi 7. W załączeniu przesyłam fragment kodu.
begin
x:=0;
for j:=1 step 1 until n do
x:=x+P[j]P[j];
x:=1/sqrt(x);
for j:=1 step 1 until n do
KSI[i,j]:=xP[j];
end;
Będę BARDZO wdzięczny za każdą pomoc :)