Я только сам цикл замены элементов массива напишу, до этого надеюсь смогешь. Если нет - в лс напиши)
Var
bufer: integer;
bufer: = 0;
Begin
For i = 1 to 4
Begin
bufer:= x[i];
x[i]:= y[i];
y[i]:= bufer;
End;
For i = 1 to 4
write(x[i], ' ');
writeln;
For i = 1 to 4
write(y[i], ' ');
End.
Правильный ответ 3. (16;-17)
(2+6(-1-2));(-7+6(1+1+2)). Мы окажемся в точке (-16;17). А что бы вернуться в исходную нужно привать 16 по оси х и вычесть 17 по оси у.
Использовать Чертежник
алг
нач
сместиться в точку (1,13)
нц 3 раз
Фигура
кц
кон
| Фигура
алг Фигура
нач
сместиться на вектор (1,-5)
опустить перо
сместиться на вектор (-1,0)
сместиться на вектор (0,5)
сместиться на вектор (4,0)
сместиться на вектор (0,-1)
сместиться на вектор (-3,0)
сместиться на вектор (0,-4)
сместиться на вектор (1,0)
сместиться на вектор (0,3)
сместиться на вектор (2,0)
сместиться на вектор (0,1)
поднять перо
сместиться на вектор (0,-1)
опустить перо
сместиться на вектор (0,-1)
сместиться на вектор (-1,0)
сместиться на вектор (0,-2)
сместиться на вектор (-1,0)
поднять перо
сместиться на вектор (1,0)
опустить перо
сместиться на вектор (1,0)
сместиться на вектор (0,2)
поднять перо
кон