У меня получилось 8 команд:
1) повернись вправо на 90 градусов;
2) пройди вперед на 2 клетки;
3) повернись влево на 90 градусов;
4) пройди вперед на 3 клетки;
5) повернись влево на 90 градусов;
6) пройди вперед на 2 клетки;
7) повернись влево (вправо) на 180 градусов;
8) пройди вперед на 5 клеток.
Если Ентик может двигаться назад, то команды под номером 7 и 8 можно заменить на "7) пройди назад на 5 клеток", тогда будет 7 команд.
Удачи…
procedure vvod(var a, b, c: integer);
begin
readln(a);
readln(b);
readln(c);
end;
procedure min(const a, b, c: longint; var d: longint);
var
i: longint;
begin
d := a;
if d > b then
d := b
else
if d > c then
d := c;
end;
procedure sum(const ch:longint;var z:longint);
begin
z := z + ch;
end;
var
a, b, c, d, f, z: integer;
…И снилось мне, что мы, как в сказке,
Шли вдоль пустынных берегов
Над диким синим лукоморьем,
В глухом бору, среди песков.
Был летний светозарный полдень,
Был жаркий день, и озарен
Веет, лес был солнцем, и от солнца
Веселым блеском напоен.
Узорами ложились тени
На теплый розовый песок,
И сипни небосклон над бором
Был чист и радостно-высок.
Играл зеркальный отблеск моря
В вершинах сосен, и текла
Вдоль по коре, сухой и жесткой,
Смола, прозрачнее стекла...
Мне снилось северное море,
Лесов пустынные края...
Мне снилась даль, мне снилась сказка –
<span>Мне снилась молодость моя.</span>
Паскаль -- команда val. Синтаксис можно почитать где-то на форумах.
Если нужны другие языки -- какие?
<span>9 (10) - 13(10)=-4(10)=-4(16)</span>