【元旦摆花】（3＋3＋3＋3＝12分）
元旦快到了，红旗小学为了在校门口用红花和黄花排成一个29×29的鲜花方阵，需要计算红花和黄花各需要多少盆。摆花时规定最外层是红花，而且从外到内分别是一圈红花，一圈黄花，这样每层都是红花和黄花间隔。下面的图3展示的是5×5方阵摆花的样子。
下列程序用来统计红花和黄花的数量，并输出红花和黄花的数量。请完善程序。

program test7;
const n=29;
var
 red_s,yellow_s,i,j:integer;
 red:boolean;
begin
 i:=n;
 red_s:=   0    ;yellow_s:=0;
 red:=true;
 repeat
  if red=true then
  begin
   red_s:=red_s+(i-1)*4;
   red:=   not(red)   ;
  end
  else
  begin
   yellow_s:=yellow_s+(i-1)*4;
   red:=not(red);
  end;
  i:=i-2;
 until i=1;
 if red=true then red_s:=  red_s+1   else yellow_s:=yellow_s+1 ;
 writeln('red flower=',red_s,'   yellow flower=',  yellow_s  );
end.