// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
for var i:=0 to a.IndexMax-1 do
if a[i]<0 then a[i]:=0;
a.Println
end.
<u><em>Тестовое решение:</em></u>
n= 15
-35 4 87 60 -93 -23 -95 -24 -19 -52 10 91 -53 -67 -1
0 4 87 60 0 0 0 0 0 0 10 91 -53 -67 -1
Да, поместятся.
2 ГБ - 2000 мб.
151*3=453 мб.
Поместится :)
Обозначим неизвестное нам основание как x. По общей формуле представления чисел в позиционной системе счисления (поищите в сети саму формулу, на этом ресурсе ссылки, к сожалению, запрещены:) ) 30 можно представить как 3*x^1 + 0*x^0 т.е. 3x и приравнять к 24. Выходит:
3x = 24
x = 8
Основание неизвестной системы счисления: 8.
Если есть вопросы по поводу решения - оставляйте в комментариях:)
Когда сравниваемые величины образуют в сумме 100%, тогда удобнее применять круговую диаграмму. Ведь круг в сумме и показыает 100%, а уже потом мы его делим (как одно целое) на соответствующие части.