Робот движется по клетчатому полю в соответствии с заданой программой. для записи программы используется следующая система команд:
1. u# - # раз сместиться на одну клетку вверх.
2.d# - # раз сместиться на одну клетку вниз
3.r# - # раз сместиться на одну клетку вправо
4.l# - # раз сместиться на одну клетку влево
5.#{} - повторить # раз последовательность команд в скобках
известно, что робот выполнил следующую программу:
10{u3 r3 u3 r3 d3 l3 d3 l6}
сколько клеток поля робот посетил ровно два раза? в ответе укажите целое число.
296
452
Ответы на вопрос:
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.
Популярно: Информатика
-
Ксюшка22121.04.2020 10:21
-
a1844128.11.2021 07:47
-
5five335314.04.2022 11:10
-
timofeevele20.09.2021 01:43
-
r7953324081317.01.2020 17:11
-
Ore1127.10.2020 14:50
-
zvezdoska27.06.2023 14:31
-
maksikus128.08.2022 18:15
-
ДмитрийJ09.05.2022 05:39
-
школьник62728474щ307.04.2020 04:13