sisip_belakang

Procedure Sisip_Belakang (input elemen : tipe_data, I/O awal, akhir : nama_pointer)

{I.S : data berupa elemen, penunjuk pointer awal dan akhir sudah terdefinisi}

{F.S : menghasilkan sisip belakang pada single linked list }

Kamus

Baru : nama_pointer

Algoritma

            Alloc(baru)

            baru↑.info ß elemen

            baru↑.next ß nil

                        if (awal = nil )

                                    awal ß baru

                        else

                                    baru↑.next ß baru

                        endif

akhir ß baru

endprocedure