Одномерный массив

[Hikerr]

Дан одномерный массив х1,...хN и массив у1,у2,...уN, элементы которого вычисляются по формуле уi=i+2. Большeе из xi, yi принять в качестве нового значения xi, а меньшее в качестве нового значения yi.

где 1,2,N,i - нижн. индексы переменных

[revizor]

А как вычисляется массив x1, x2, ... xN?

[Hikerr]

это массив просто дан. x1,x2,...,xN - это массив одномерный

[revizor]

program NameProgram;

Function Min(a:integer; b:integer):integer;
begin
	if a<b then Min:=a
	else Min:=b;
end;

Function Max(a:integer; b:integer):integer;
begin
	if a>b then Max:=a
	else Max:=b;
end;

const
	N=10;			{ размер массивов }
var
	x: array[1..N] of integer;
	y: array[1..N] of integer;
	i: integer;
begin
	Write('Enter ', N, ' numbers -> ');
	for i:=1 to N do
	begin
		Read(x[i]);
		y[i]:=i+2;
	end;
		
	for i:=1 to N do
	begin
		x[i]:=Max(x[i], y[i]);
		y[i]:=Min(x[i], y[i]);
	end;
	
	Write('x = ');
	for i:=1 to N do
		Write(x[i], ' ');
	WriteLn('');
		
	Write('y = ');
	for i:=1 to N do
		Write(y[i], ' ');
	WriteLn('');

	ReadLn;
	ReadLn;
end.

Вроде правильно

[Hikerr]

да, она работает, ты не может разъяснить что она делает. как я не пытался вникнуть в задачу не понимаю что она должна выводить