program for3;var i:integer;begin for i:=5 downto 1 do begin writeln('hello'); writeln('i = ',i); end;end.