PHP код:
Pascal:
int main() {
FILE *sisf = fopen("nadal.sis", "rt");
char N;
int PP, KK, AAAA;
fscanf(sisf, "%c, %d.%d.%d", &N, &PP, &KK, &AAAA);
fclose(sisf);
int esmaspaev_PP;
esmaspaev_PP = PP - anna_nadalapaeva_nr(N);
if (esmaspaev_PP <= 0) {
esmaspaev_PP += paevi_eelmises_kuus(KK, AAAA);
}
int nadal = (esmaspaev_PP - 1) / 7 + 1;
FILE *valf = fopen("nadal.val", "wt");
fprintf(valf, "%d\n", nadal);
fclose(valf);
return 0;
}
В этоге, есть текстовой файл, в нем написано "N, 11, 11, 1988"
Думаю по коду вполне понятно, что с ним надо делать.
Простите за тупость, но уже 3 дня ничего не получается, потому обращаюсь к любимому форуму.
Спасибо зараннее заинтересовывшимся.