БАЛЛОВ НЕ ТОЛЬКО ПРАВИЛЬНО РЕШИТЕ!!! ВНИМАТЕЛЬНО ЧИТАЙТЕ ЗАДАНИЕ!
Где-то в поле Робота находится горизонтальная стена с отверстием в одну клетку,
размеры которой неизвестны. Робот из произвольной клетки над стеной, но обязательно
напротив нее, должен дойти до стены и закрасить все клетки под ней, как показано на
рисунке.
!ВНИМАНИЕ! ЗАДАЧУ НУЖНО РЕШИТЬ С ПРЕМЕННОЙ n!
По типу n цел
n:=0
n:=n+2
нц n+2 раз.
РЕШЕНИЕ БЕЗ ПЕРЕМЕННОЙ БУДЕТ НЕВЕРНЫМ!

ответ:По типу n цел

n:=0

n:=n+2

нц n+2 раз.

РЕШЕНИЕ БЕЗ ПЕРЕМЕННОЙ БУДЕТ НЕВЕРНЫМ!

Объяснение:

По типу n цел

n:=0

n:=n+2

нц n+2 раз.

РЕШЕНИЕ Б

\

гароитрпаит мирпаимт исмолпрлиморпим миопимть ичапим

роимт ри

Объяснение:

аи млпь мьпрми тьрь ртимрон жопа раимтоаи  иоми тоат

найди слово :)

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.

uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.