Массивы В1(10) и В2(10) заполнены случайными числами. Сформировать третий массив, каждый элемент которого равен большему из соответствующих элементов данного массива. Вывести три массива.

var b1,b2,b3:array[1..10] of integer; i:integer; begin for i:=1 to 10 do begin b1[i]:=random(-50,50); b2[i]:=random(-50,50); b3[i]:=max(b1[i],b2[i]); end; write('B1 Mass   '); for i:=1 to 10 do write(b1[i]:3,' '); writeln; write('B2 Mass   '); for i:=1 to 10 do write(b2[i]:3,' '); writeln; write('B3 Mass   '); for i:=1 to 10 do write(b3[i]:3,' '); end.