Четырехзначные числа, содержащие "в серединке" 22 имеют вид х22y,
где х ∈ [1;9], y ∈ [0;9].
Если число кратно 5, то оно оканчивается на 0 или на 5, т.е. у=0 или у=5 и для каждого х получаем пару чисел х220 и х225, а их сумма для каждого х равна х*1000+220+х*1000+225 или 2000*х+445.
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
Println('Сумма',1.To(9).Select(n->2000*n+445).Sum);
Println('Кол-во',2*(1.To(9).Count))
end.
Результат:
Сумма 94005
Кол-во 18