[pascal] scrivere un programma che calcola le uscite famigliari

[multififa]

mi spiegate come devo scrivere un programma che calcola le spese famigliare di una famiglia effettuate per categoria (divertimento, altro, affitto, ecc).
Il programma deve incominciare nel seguente modo

Program spesefam
Type
Spese:= (divertimento, altro, affitto, ecc)
var
spesa:spese;

Come faccio a dare un valore numerico a divertimento, altro,affitto

[cielo81]

è impossibile perchè sono sempre + alte dello stipendio quindi ti faresti solo del male....


scherzo ma nn so il pascal

[LeleFT]

Cosa intendi dire con "dare un valoer numerico"?
Se intendi creare un Record (ossia una struttura dati eterogenea) esiste l'apposito tipo RECORD.
Ma se a quei campi intendi dare solo valori numerici, allora ti conviene utilizzare gli array e un modo carino potrebbe essere questo:

Program spesefam;
Const DIVERTIMENTO = 1;
      AFFITTO      = 2;
      ...
      ALTRO        = N;  (* N deve essere un numero *)

TYPE Spese = ARRAY[1..N] Of Integer;

Var spesa : Spese;

Begin
   (* Ora puoi utilizzare le costanti per indicizzare l'array *)
   spesa[DIVERTIMENTO] := 500;
   spesa[AFFITTO] := 600;
   ...
End.

Ciao.