//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
var a:=ArrRandom(10); println(a);
for var i:=0 to 9 do
if a[i] mod 2 =0 then print(a[i]);
end.
Тестовое решение:
[57,42,71,42,53,88,86,80,87,74]
42 42 88 86 80 74
3 вариант, все остальное рассуждение.
X - сумма через год
Формула для вычисления процента от общей суммы = ((n*p)/100)
Следовательно, x = n+((n*p)/100)
//PascalABC
7)а) if (x > y) then z := x + y
else z := y - x;
б)при x = 5 и y = -6 (x > y)
z = x + y = -1
8) if (num1 < num2) then num1 := num1 + num2
else num1 := num1 - num2;
Е<span>сли в алфавите 64 символа, то каждый знак кодируется 6 битами, потому что 64 = 2^6. </span>
<span>20 символов по 6 бит содержат 20*6 = 120 бит = 120/8 = 15 байт.</span>