<h3>PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var X := ArrRandom(ReadInteger('A='), -21, 21);
X.Println;
X.Sorted.Println;
X.Where(t -> t.IsOdd).OrderDescending.Println
end.
<h3>A= 18</h3><h3>9 9 -10 21 -11 -13 -2 19 5 20 -5 20 11 -6 -2 -10 14 -12</h3><h3>-13 -12 -11 -10 -10 -6 -5 -2 -2 5 9 9 11 14 19 20 20 21</h3><h3>21 19 11 9 9 5 -5 -11 -13</h3>
1) Слева должна быть переменная
Верно A:=5+5
3) не ясно, является переменная C строковой, чтобы можно было осуществить склейку.
4) Если game описано как целое, то верно
5) Можно сделать так:
a:=5;
c:=5;
всего точек: 52 * 52 = 2704
т.к. изображение черно-белое (без градаций серого), имеет 2 цвета, то 2¹ = 2, одна точка — это один бит
объем памяти: 2704 * 1 = 2704 бит = 338 байт
const n=10;
var a:array [1..n] of integer;
i,k:integer;
begin
for i:=1 to n do
begin
a[i]:=random (10);
if a[i] mod 2 = 0 then k:=k+1;
write (a[i],' ')
end;
writeln;
writeln (k)
end.