Cod sursa(job #3357125)

Utilizator Olariu_MarioOlariu Mario Andrei Olariu_Mario Data 6 iunie 2026 15:17:27
Problema Al k-lea termen Fibonacci Scor 20
Compilator c-64 Status done
Runda Arhiva educationala Marime 0.72 kb
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#define MAX 1000000
#define MOD 666013

int F[MAX];

int main()
{
    FILE *file = fopen("kfib.in", "r");
    FILE *output = fopen("kfib.out", "w");
    if (file == NULL)
    {
        fprintf(stderr, "Eroare deschidere fisier intrare.\n");
        return 1;
    }
    if (output == NULL)
    {
        fprintf(stderr, "Eroare deschidere fisier iesire.\n");
        fclose(file);
        return 1;
    }
    int n ;
    fscanf(file, "%d", &n);
    F[0] = 0;
    F[1] = 1;
    for(int i=2 ;i<=n ;i++)
    {
        F[i] = (F[i-1]+ F[i-2])%MOD;
    }
    fprintf(output, "%d\n", F[n]);
    fclose(file);
    fclose(output);
    return 0;
}