X+7*(-1-2+4) = 0; y+7*(2+2-4) = 0
x = -7; y = 0
Ответ: начальные координаты Чертёжника(-7,0)
Алгоритм 21211
вычти 1: 27-1=26
раздели на 2: 26/2=13
вычти 1: 13-1=12
раздели на 2: 12/2=6
раздели на 2: 6/2=3
Ответ: 21211
Например так:
#!/usr/bin/perl
for(1..12){@arr[$_]=int(rand(100))};
print "@arr\n";
print "Write first element:"; chomp($n1=<>);
print "Write second element:"; chomp($n2=<>);
(@arr[$n1], @arr[$n2])=(@arr[$n2], @arr[$n1]);
print "\
[email protected]\n"
Только по хорошему нужна проверка введенных значений еще.