сделал прогу просто на паскале все получилось, а вот делаю в ассемблере и не идет. непонимаю эту косвенную адресацию....

вот код паскаля:

program Fibonachchi;
const n=9;
var a,b:array [1..n] of byte;
i, isled, ipred:byte;
begin
randomize;
writeln('Massiv A: ');
for i:=1 to n do
begin
a[i]:=random(20);
write(a[i]:5);
end;
readln;
writeln;

ipred:=1;
isled:=1;
writeln('Massiv B: ');
while isled < n do
begin
if isled=1 then
begin

b[i]:= a[isled];
write(b[i]:5);
isled:=isled+ipred ;
end
else

begin
b[i]:= a[isled];
write(b[i]:5);
i:=isled;
isled:=i+ ipred;
ipred:=i;
end;
end;

writeln;
readln;
end.

Добавлено (26.05.2008, 17:34)
---------------------------------------------
никто не работал на встроенном ассемблере???ну подскажите про косвенную адресацию.получается переписывать все элементы массива А.а как переписывать только фибоначиевские????

Добавлено (27.05.2008, 19:22)
---------------------------------------------
АААА!!!я решил!!!сам!!!спасибо за то, что откликнулись и помогли))))