[Computação] Programa em Pascal - Ajuda

[Pessoa Estranha]

Olá.... Acho que esta parte é dedicada para expor materiais de estudo, mas o que coloco aqui é uma dúvida. Peço desculpas, pois ainda não estou muito familiarizada com esta área do site.
Bem, a minha dúvida é sobre Estruturas de Repetição (Disciplina: Introdução à Ciência da Computação). Resolvi um exercício, mas o resultado final não é o mesmo do programa pronto. Enunciado: "Um funcionário de uma empresa recebe aumento salarial anualmente. Sabe-se que:
a) Esse funcionário foi contratado em 2005, com salário inicial de R$ 1000.00.
b) Em 2006, ele recebeu aumento de 1.5% sobre seu salário inicial.
c) A partir de 2007 (inclusive), os aumentos salariais sempre corresponderam ao dobro do percentual do ano anterior.
Faça um programa que determine o salário atual desse funcionário.

Observações: na minha resolução, s5 significa 'salário em 2005'; s6, 'salário em 2006'; s, 'salário'; a, 'aumento';
Resposta correta: 13036.15.

Minha resolução:

PROGRAM NOVA_TENTATIVA_EX01_ER;

var

s5, s6, s, a : real;
i : integer;

begin

s5 := 1000.00;
s6 := s5 + (0.015 * s5);

a := 0.015;
s := s6;

FOR i := 2007 TO 2013 DO

a := 2 * 0.015;
s := s + (a * s);

writeln;
write ('O salario atual do funcionario eh de: ', s:2:2);

readln;
end.

Por favor, onde está o erro ?? Obrigada!