Напишите для робота алгоритм, закрашивающий все клетки, расположенные с внутренней стороны правой и нижней стен. робот должен закрасить только клетки, удовлетворяющие данному условию. !

163

370

Посмотреть ответы 2

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

ЮлияСтоянова

Информатика

4,5(29 оценок)

Если препятствий нет, то использовать робот алг нач нц пока справа свободно вправо кц нц пока сверху свободно вверх кц закрасить нц пока снизу свободно вниз закрасить кц нц пока слева свободно влево закрасить кц кон

Zhenya2188

Информатика

4,8(49 оценок)

1) program asd; uses crt; const n=10; var a: array[1..n] of integer; i,kp,s: integer; begin writeln('массив: '); for i: =1 to n do begin a[i]: =random(20); write(a[i]: 4); end; writeln; for i: =1 to n do begin if a[i] mod 3=0 then s: =s+1; end; writeln('сумма: ' ,s); end.2)program asd; uses crt; const n=10; var a: array[1..n] of integer; i,kp,s: integer; beginwriteln('массив: '); for i: =1 to n do begin a[i]: =random(20)-10; write(a[i]: 4); end; writeln; for i: =1 to n do begin if a[i]< 0 then s: =s+1; end; if s=0 then writeln('нет отр. элементов! '); writeln('сумма отр. элементов: ' ,s); end.