Вот решение: все на листочке, там сами ответы, если надо решение, могу позже описать
Ответ, в текстовом виде не прикладывается
Var
n,m,k,i,l,max,min:longint;
begin
max:=-maxlongint;
min:=maxlongint;
readln(n);
for i:=1 to n do
begin
readln(n);
if n>max then max:=n;
if n<min then min:=n;
end;
writeln('Самый высокий ',max);
writeln('Самый низкий ',min);
end.
Правильно она называется - Операция взятия адреса (если это С++)
1) 1
2) 0
3) 1
4)1
5)0
6)0
7)0
8)0
9)0
10)0