[Димона]

в целочисленной последовательности есть нулевые элементы. Создать массив из номеров этих элементов.

Код:

var
a:array  of integer;
mas:array [1..10] of integer;
i,z,n:integer;
begin
z:=1;
setlength(a,n);
for i:=low(a) to high(a)
do begin
a[i]:=random(n);
memo1.Lines.add(inttostr(a[i]));
if a[i]=0 then begin mas[z]:=i;
z:=z+1;
end;
end;
memo2.lines.add(inttostr(mas[z]));
 end;

выводит не то что нужно..(( и еще try except.. как его применить?

[stil]

эта целочисленная последовательность каким образом формируется

[stil]

в google поищи должно быть

[Димона]

Сообщение от stil

эта целочисленная последовательность каким образом формируется

рандомом.. в мемо1 вывожу..

[Димона]

а как насчет исключений? try except

[ryderx34]

Код:

if a[i]=0 then 
begin 
mas[z]:=i;
memo2.lines.add(inttostr(mas[z])); // эта строка должна быть здесь
z:=z+1;
end;

Сообщение от Димона

и еще try except.. как его применить?

Где применить и для каких целей? В этом коде?