Не ясно какие именно операции можно использовать. Тут хорошо подойдет Исключающие Или, строгая дизьюнкция, бинарное сложение по модулю 2 (плюсик в кружечке), Xor
Если в обычных операндах дизъюннкции(or) и конъюнкции(and) , то будет так
(not (x>10) and (y>10)) or ((x>10) and not(y>10))
var a:array[1..10]of integer;
i,n1,n2:integer;
s:real;
begin
for i:=1 to 10 do begin
readln(a[i]);
s:=s+a[i];
end;
s:=s/10;
for i:=1 to 10 do begin
if a[i]>s then inc(n1);
if a[i]<s then inc(n2);
end;
writeln('bolshe - ',n1,' menshe - ',n2);
end.
Вверх — переместить Робота на одну клетку вверх
вниз — переместить Робота на одну клетку вниз
влево — переместить Робота на одну клетку влево
вправо — переместить Робота на одну клетку вправо
закрасить — закрасить текущую клетку (клетку в которой находится Робот).
Так же есть циклы
если условие
то серия 1
иначе серия 2
все
выбор
при условие 1 : серия 1
при условие 2 : серия 2
…
при условие n : серия n
иначе серия n+1
И условия
слева стена
справа стена
снизу стена
сверху стена
клетка закрашена
слева свободно
справа свободно
снизу свободно
сверху свободно
клетка чистая