Вроде так :
Матвей (третья согл и последняя согл)
3 (x>2 x<=3)
3 (x>2 x<4)
Ответ: 16-8 в десятичной, в двоичной будет 10000 - 1000 = 1000
Проверка: 1000+1000 = 10000
Random ВЕРНЫЙ и не надо со мной спорить! Там четко написано максимальное значение 45, минимальное значение 0-15=-15!!
Программа в файле
Program rtr1;Uses crt;Var a:array [1..100] of real; mx, max,min:real; max1,min1,i,n:integer;Begin Clrscr; Write('n='); Readln(n); Writeln('Вводите массив:'); for i:=1 to n do readln(a[i]); max:=a[1]; min:=a[1]; for i:=1 to n do begin if a[i]>=max then max:=a[i]; if a[i]<=min then begin min:=a[i]; min1:=i; end; end; i:=1; while a[i]<>max do begin i:=i+1; end; max1:=i; mx:=a[max1]; a[max1]:=a[min1]; a[min1]:=mx; for i:=1 to n do write('a[',i,']=',a[i],';'); End.