По x точка 6, по y 2, координаты точки А (6;2)
1):<span>С:\Учебный\Информатика\Кодирование ->
</span><span>С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span><span>С:\Учебный\Информатика ->
</span><span>С:\Учебный\Информатика\Кодирование ->
</span>С:\Учебный\Информатика ->
С:\Учебный ->
Не подходит, т.к. Витя опустился на n уровней, а поднялся на n+2, что не подходит по условию.
2)С:\Учебный\Информатика\Кодирование ->
<span> С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span> С:\Учебный\Информатика ->
<span> С:\Учебный\Информатика\Программирование->
</span><span>С:\Учебный\Информатика\Программирование\Паскаль
</span>Не подходит, т.к. Витя спустился на либо на 2 уровня вниз, либо на 3, а поднялся либо на 3, либо на 4 уровня вверх, что не подходит по условию.
3)<span>С:\Учебный\Информатика\Кодирование ->
</span>С:\Учебный\Информатика ->
С:\Учебный ->
<span> С:\Учебный\Математика ->
</span><span> С:\Учебный\Математика\Дроби
Подходит. </span>Витя опустился на 2 уровня вниз и поднялся на 2 уровня вверх.
4)С:\Учебный\Информатика\Кодирование ->
<span> С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span><span>С:\ ->
</span><span>С:\Учебный\ ->
</span><span>С:\Учебный\Информатика
</span>Не подходит, т.к. Витя спустился на 3 уровня вниз, а поднялся на 2, что не подходит по условию.
Ответ: 3)
13 в 10-ой = 1101 в 2-ой.
Запишем в 16 разрядной ячейке:
Первый разряд ячейки отводим под знак числа. Число положительное, значит записываем 0.
0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 1
Попробуй так:
const<span> nmax=100;
var
a: array[1..nmax,1..nmax] of integer;
i,j,m,n,min,max,i_max,j_max,i_min,j_min,tmp: integer;
begin
randomize;
write('Введите размеры массива m, n: ');
readln(m,n);
writeln('Исходная матрица:');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=random(99)+1;
write(a[i,j]:4);
end;
writeln;
end;
writeln;
min:=a[1,1]; max:=a[1,1];
i_min:=1; j_min:=1; i_max:=1; j_max:=1;
for i:=1 to m do
for j:=1 to n do
begin
if a[i,j]>max then
begin
max:=a[i,j];
i_max:=i;
j_max:=j;
end;
if a[i,j]<min then
begin
min:=a[i,j];
i_min:=i;
j_min:=j;
end;
end;
writeln('Максимальный элемент: ',max,'[',i_max,',',j_max,']');
writeln('Минимальный элемент: ',min,'[',i_min,',',j_min,']');
tmp:=a[i_min,j_min];
a[i_min,j_min]:=a[i_max,j_max];
a[i_max,j_max]:=tmp;
writeln('Полученная матрица:');
for i:=1 to m do
begin
for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
readln;
end.</span>
