Помогите написать программу, пожалуйста.
Напишите программу, которая находит сумму двухзначных нечетных чисел. Последовательность чисел заканчивается числом 0.

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  ReadSeqIntegerWhile(t->t<>0)      .Where(t->t.IsOdd and t.InRange(10,99)).Sum.Printlnend.

Program n1;var a,sum: integer;beginreadln(a);sum:=0;while a<>0 dobeginif (a>9) and (a<100) and (a mod 2<>0) then sum:=sum+a;readln(a);end;write(sum);end.