Помогите пожалуйста:3 В числовую переменную последовательно вводятся целые числа, не равные нулю. кол-во вводимых чисел n неизвестно. Найти сумму тех чисел, в которых встречаются ровно две цифры 5.(в паскале написать программу)

// PascalABC.NET 3.2, сборка 1367 от 20.12.2016 // Внимание! Если программа не работает, обновите версию! begin   var t:integer;   var k:=0;   repeat     Read(t);     if t.ToString.Where(c->c='5').Count=2 then k+=1   until t=0;   Writeln('Количество чисел с двумя пятерками равно ',k) end.