В четверичной системе счисления
356 дискет если 512 разделить на 1,44
<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
Плюшевый мишка. Он белый,пушистый,милый мишка. Он умеет стоять ,лежать ,сидеть и смотреть.