Dar matau blogu iprociu:

int Pi[100],Ti[100], N, S,i,sum=0,max=0;

    1. Naudoji keliu tipu kintamuju case'a, jei jau darai visus kintamuosius mazojom tai visus ir daryk, o ne vienus mazojom kitus didziojom;
    2. Kintamuosius geriau rasyti kuo suprantamesnius, dzin kad jis bus kad ir 10 raidziu ilgio, bet uztai bus aisku kas ten ir po metu ar keliu;

Skirtingas logines dalis kaip cia geriau nesulieti:

     int Pi[100],Ti[100], N, S,i,sum=0,max=0;
     FILE *in, *out;
     in=fopen("keliautojas-vyr.in","r");
     out=fopen("keliautojas-vyr.out","w");

Cia sulieta deklaracijos su funkcionalumu, geriau butu taip:

    // Local variables
     int Pi[100],Ti[100], N, S,i,sum=0,max=0;
     FILE *in, *out;

    // Opening files
     in=fopen("keliautojas-vyr.in","r");
     out=fopen("keliautojas-vyr.out","w");