path: root/ipl/packs/loadfuncpp/examples/sums2.icn

procedure main()
    local sum;
    sum := 0;
    every sum +:= 1 to 5
    write ( "The sum of all numbers from 1 to 5 is ", sum );
end