Трэкбол (но сейчас их называют тэчпэдом)
Ответ номер 3. 15 Кбайт. Перемножаешь страницы, строки и символы. На 8 бит не умножаешь, так как ответ в байтах.
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var f:=ArrRandom(9,-50,50); f.Println;
var k:=f.Select(t->t*t).ToArray; k.Println
end.
<u>Пример</u>
39 0 28 31 -35 -2 -11 -48 -32
1521 0 784 961 1225 4 121 2304 1024
Всех выходов ,возможных 16, но ожидаемых выходов всего лишь 4. ;
4\16 = 1\4= 25%