program Racunanje_cijene_plina;
uses crt,graph;
type pokazivac=^struktura;
     struktura=record
 ime:string[30];
 mjesto:string[20];
 ulica:string[50];
 postanski_broj:integer;
 v:real;
 e:real;
 eo:real;
 cbruto:real;
 cneto:real;
 p:pokazivac;
     end;
var trenutni,pocetni,prethodni:pokazivac;
    i:integer;

{PROCEDURA ZA UNOS NOVOG E ... Read more »