128 = 2^7 значит 7 бит на символ
Общий обьем данных 7*180*2048 = 2 580 480 бит = 322 560 байт = 315 кб
<em>// PascalABC.NET 3.2, сборка 1387 от 20.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,1,10000); a.Println;
a:=a.Where(x->not ((x mod 10<>0) and (x mod 10).IsEven
and (x mod (x mod 10)=0))).ToArray;
a.Println
end.
<u>Пример</u>
1266 6274 1359 3481 9554 324 1546 3063 8166 1562
6274 1359 3481 9554 1546 3063
11,22,33,44,55,66,77,88,99 - девять чисел.
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := ReadReal('x=');
var y := x < 1 ? 2 * x + 1 : 3 * x - 1;
y.Print
end.
Введи в поисковик из одной системы счисления в другую и найдёшь инструмент.
1.
a) 1011010001.011 (2); 1321.312 (8); <span>2D1.656 (16)
б) </span>1101111010110.010 (2); 15726.227 (8); 1BD6.4B8 (16)<span>
в) </span>110000000010.010 (2); 6002.270 (8); <span>C02.5C6
2. 538 = </span><span>1000011010 (2)
3. a)</span>756.25; б) 207.36 в) <span>1780.75
далее найди инструмент и сам</span>