Visualizzazione dei risultati da 1 a 2 su 2
  1. #1

    Lista Ordinata Semplice (in Turbo Pascal)

    Ciao,io dovrei fare un programma fatto da procedure riguardante una lista ordinata semplice;di questa lista dovrei fare :
    linserimento;
    cancellazione;
    visita della lista;
    qualcuno mi puo aiutare?
    io ho inziato facendo la dichiarazione dei tipi

    program gest_lista;
    type
    pnodi=^nodi;
    nodi=record
    dato:integer;
    succ:Pnodi;
    end;
    var t:Pnodi;

    (poi ho fatto la procedure per svuotare la lista)

    procedure svuota_lista;
    begin
    T:=nil;
    writeln('la lista è vuota');
    end;

    ora devo fare la procedura dell'inserimento e la cancellazione....
    grazie per l'eventuale aiuto...
    a presto

  2. #2
    ho fatto qualche modifica al codice di sopra ora è giusto:

    Program gest_lista;
    TYPE Pnodo:^nodo;
    nodo=record
    dato,info:integer;
    succ.prec,corr:Pnodo;
    end;
    var T,nuovo:Pnodo;
    Procedure svuota_lista;
    begin
    T:=nil;
    writeln('la lista è vuota');
    end;
    Procedure visita(T);
    var a:Pnodo;
    begin
    a:=T;
    if t=nil then
    writeln('la lista è vuota')
    else
    REPEAT
    write('',a^.info,'-');
    a:=a^.succ;
    UNTIL (a=nil);
    end;

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.