===== PascalABC.NET =====
begin
var n := ReadInteger('Задайте n:');
var a := ReadArrInteger('Вводите массив:', n);
Println('Количество нулевых элементов равно',
a.Count(p -> p = 0))
end.
Т.к 30 символов, то умножаем на 2 и получаем 60 байт.Теперь умножаем на 8 и получаем 480бит.
Ответ:2
Развернутая форма:
12345 = 1*10^4 + 2*20^3 + 3*10^2 + 4*10^1 + 5*10^0
Схема Горнера:
10*(10*(10*(10*1+2)+3)+4)+5