Есть ответ 👍

Робот движется по клетчатому полю в соответствии с заданой программой. для записи программы используется следующая система команд:
1. u# - # раз сместиться на одну клетку вверх.
2.d# - # раз сместиться на одну клетку вниз
3.r# - # раз сместиться на одну клетку вправо
4.l# - # раз сместиться на одну клетку влево
5.#{} - повторить # раз последовательность команд в скобках
известно, что робот выполнил следующую программу:
10{u3 r3 u3 r3 d3 l3 d3 l6}

сколько клеток поля робот посетил ровно два раза? в ответе укажите целое число.

296
452
Посмотреть ответы 1

Ответы на вопрос:

Arthurkaa
4,5(34 оценок)

var

n, sum, i, a: Integer;

begin

n:=100;

sum:=0;

for i := 1 to n do  

begin

readln(a);

if a = 0 then

begin

break;

end;

if (a <= 300) and (a>0) and (a mod 6 = 0) and (a mod 10 = 4) then begin

sum:=sum+a;

end;

end;

writeln(sum);

end.

Популярно: Информатика