<span>Разбиваешь данное число на тетрады 011 010 111. Каждую тетраду заменяем двоичным числом, получаем ответ 327
</span><span>калькулятор в инженерном режиме встренный в виндовс тебе поможет :)</span>
В следующий раз внимательно смотрите за переменными и что вы им присваиваете и желательно вам разобратся в типах данных, это основы основ.
Задание недоопределено. Не описан сам интерфейс игры, то есть что можно говорить компютеру и что он может отвечать.
Например, говорить можно только число в указанном интервале, ответом могут быть
угадал (без штрафа)
не угадал (штраф 3)
вне интервала (штраф ?)
Или по-другому
угадал (без штрафа)
больше (штраф 3)
меньше (штраф 3)
вне интервала (штраф ?)
Или ещё как-то.
Без формализации интерфейса написать программу невозможно!
<em>// PascalABC.NET 3.2, сборка 1431 от 28.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(20,-99,99).Select(k->k/10).ToArray; a.Println;
Writeln('Сумма квадратов элементов: ',a.Select(x->x*x).Sum)
end.
<u>Пример</u>
-6.7 -6.9 -1.8 7 6.6 6 -8.5 -7.8 6.7 -1.6 -9.3 -4.5 5.9 -4.6 -3.6 -0.2 2.1 4.7 7.5 -5.7
Сумма квадратов элементов: 695.79
Нажать на левую кнопку мыши два раза