//Robertas Jurkaitis, 8 grupe, uzduotis 3, variantas 2
#include "stdio.h"

int main()
{
    FILE *f;
    char doc[100];
    float kint, maks, min, suma;
    
    printf("Failo pavadinimas? (Ne daugiau 20 simboliu)\n --> ");                                          
    scanf("%s", &doc);
    f=fopen(doc, "w");
    
    printf("Iveskite realiuosius skaicius, su kuriais norit vykdyti programa\n");
    printf("Skaiciai turi buti didesni uz -999999\n");
    printf("Jei norit baigti, iveskite -999999\n");
    scanf("%f", &kint);
    
    while (kint!=-999999)                                                       
        {
            fprintf(f, "%f", kint);
            scanf("%f", &kint);
        }
    fclose(f);
  
//MAKSIMALUS
    
    f=fopen(doc, "r");                                                                  
    maks=kint;
    while (!feof(f))
        {
            fscanf(f, "%f", &kint);
            if (kint>maks)
                maks=kint;
        }
    fclose(f);

//SUMA
    
    f=fopen(doc, "r");                                                            //suma               
    suma=0;
    do 
        {
            fscanf(f, "%f", &kint);
            suma=suma+kint;
        }
    while (kint!=maks);
    suma=suma-maks;
    fclose(f);
    
//MINIMALUS
    
    f=fopen(doc, "r");
    do 
        fscanf(f, "%f", &kint);
    while (kint!=maks);
    min=maks;
    while (!feof(f))
        {
            fscanf(f, "%f", &kint);
            if (kint<min) 
                min=kint;
        }
    fclose(f);
   
    printf("Didziausias elementas = %3.3f\n", maks);
    printf("Suma iki pirmojo didziausio elemento = %3.3f\n", suma);
    printf("Maziausias elementas, kuris yra po pirmojo didziausiojo elemento = %3.3f\n", min);
   
    getchar();
    getchar();
}