===== PascalABC.NET =====
begin
ReadSeqInteger('Введите 12 чисел', 12)
.Count(p -> p.InRange(-9, 9)).Println
end.
1 МБ = 1024 Кбайт
0,5 МБ = 512 Кбайт
1024 * 15 + 512 = 15872 Кбайт
Ответ: 15872 Кбайт
x:=(a+b)/(c+sqr(a));
б) развёрнутой форме