Использовать робот
алг
нач
нц пока слева свободно
влево
кц
закрасить
нц пока слева стена
вниз
кц
влево
нц пока сверху стена
влево
кц
вверх
нц пока справа стена
вверх
кц
нц пока слева свободно
закрасить
влево
кц
закрасить
нц пока слева стена
вниз
кц
влево
нц пока сверху стена
влево
кц
вверх
нц пока справа стена
вверх
кц
закрасить
нц пока слева стена
вниз
кц
влево
нц пока сверху стена
влево
кц
вверх
нц пока справа
вверх
кц
закрасить
кон
<em>VAR</em>
<em> ind: LongInt;</em>
<em> b: Array [1..10] of Real;</em>
<em>BEGIN</em>
<em> Writeln('Введите 10 чисел (элементы массива):');</em>
<em> for i := 1 to 10 do Read(b[i]);</em>
<em> </em>
<em> Write('Введите индекс эл. массива: ');</em>
<em> Read(ind);</em>
<em> Write(b[ind]);</em>
<em>END.</em>
Переведите число CAFE из 16ричной в 2 систему счисления
сколько будет ABC(18) + DEF(20) в двоичной
Ответ:
надо разложить его на множители и отыскать чётные