Question

Заполнить массив Y элементами массива X, находящимися после его максимального значения в X.
4 1 8 2 7 3 X
2 7 3 Y

Answer 1

program F777;

var
X,Y:array[1..102] of integer;
mult,i,j:integer;

begin  

end.