1)Робот действует на прямоугольном клетчатом поле. Между некоторыми клетками поля могут быть расположены стены. Некоторые клетки могут быть закрашены
2)Робот занимает ровно одну клетку поля. По командам вверх, вниз, влево и вправо Робот перемещается в соседнюю клетку в указанном направлении. Если на пути оказывается стена, то происходит отказ — выдается сообщение о невозможности выполнить очередную команду.
3)По команде закрасить Робот закрашивает клетку, в которой .стоит. Если клетка уже была закрашена, то она закрасится повторно, хотя никаких видимых изменении не произойдет.
4) Робот может исполнять только правильно записанные команды. Например, если вместо команды вниз написать внис, то Робот эту запись не поймет и сразу же сообщит об ошибке.
Код:
program Hell0;
const N = 10; // Количество чисел
var
a: array [1..N] of integer;
i: integer;
x: integer;
answer: boolean;
begin
for i:=1 to N do
begin
read(a[i]);
end;
for i:= 1 to N do
begin
if a[i] mod 2 <> 0 then
answer := true;
end;
write(answer);
end.