Cod sursa(job #27089)

Utilizator nuddyHorgan Cristinel nuddy Data 6 martie 2007 08:18:28
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
Raporteaza aceasta sursa 
{$N+}
var f,g:text;
    a,b:extended;
begin
     assign(f,'adunare.in');
     reset(f);
     readln(f,a);
     read(f,b);
     assign(g,'adunare.out');
     rewrite(g);
     write(g,(a+b):0:0);
     close(g);
end.