легкая задача по блок схеме

[antonioband]

помогите пожалуйста! составить программу по этой блок схеме!

[NewLamer&Programer]

begin
a:= 1;
b:= 2;
while a<=7 do
begin
a:= a + 1;
b:= a + b;
c:= 2*b - a;
end;
c:= c + 1;
end;