8=i^2, значит 1 символ весит 3бита
3*32=96бит
<em>// PascalABC.NET 3.2, сборка 1341 от 20.11.2016</em>
begin
var a:=ArrRandom(15,-10,30); a.Println;
var b:=ArrRandom(25,-10,30); b.Println;
var ma:=a.Where(x->x.IsEven).Max;
var mb:=b.Where(x->x.IsEven).Max;
if ma>mb then
WritelnFormat('Максимум четных 1-го массива {0} больше 2-го {1}',ma,mb)
else
if mb>ma then
WritelnFormat('Максимум четных 1-го массива {0} меньше 2-го {1}',ma,mb)
else Writeln('Максимумы четных элементов в массивах равны ',ma)
end.
Пример
-2 30 -1 19 16 26 21 24 5 19 -3 28 10 11 -9
14 6 -2 28 26 4 8 -4 -7 28 -4 10 -9 6 29 -10 8 9 26 5 12 23 18 9 20
Максимум четных 1-го массива 30 больше 2-го 28
1.Саша по середине листка ниже от него 3 стрелочки 1)маша 2) Гриша 3)Даша. От маши к грише еще стрелочка
2)есть в учебнике на стр 19.
Ответ:
допустим если есть только два знака мы можем создать несколько слов да , ну и д.р. этот шифр мальчики создали его чтобы другие ребята не могли подсмотреть или подслушать
C: = a - b * 2;
Переменную b не обязательно брать в скобки, ибо умножение выполняется первее .