Запишите на языке паскаль программу решения : дана последовательность чисел 5,9,13, . определите число слагаемых, сумма которых равна 324

Var
a,b,c:integer;
begin
c:=5;
b:=5;
a:=1;
repeatc:=c+4;
b:=b+c;
a:=a+1;
until b=324;
writeln('Количество слагаемых:',a);
end.