Даны два массива A (N) и B (N), где N <= 15. Найти номер 1-ого нуля массива А и составить…

Uses crt; var n,nullindex,i: integer; a,b,c: array[1… 15] of integer; beginwriteln ('N? '); read (n); writeln ('Введите элементы 1-го и 2-го массива.'); for i: =1 to n doread (a[i]); for i: =1 to n doread (b[i]); nullindex: =0; for i: =1 to n doif a[i]<>0 thenc[i]: =min (a[i],b[i]) elsebeginnullindex: =i; break; end; if nullindex=0 thenwriteln ('Элемент не найден.') elsebeginwriteln (nullindex); for i: =1 to nullindex-1 dowrite (c[i],'); end; end.