const n=5; var i: integer; a: array [0..n] of integer; begin for i := 0 to n do readln(a[i]); for i := 0 to n do begin if a[i]=0 then write('nomer elementa massiva = ', i,' '); end; end.
Яндекс