Cod sursa(job #288940)

Utilizator hominiduBirsan Dragos hominidu Data 26 martie 2009 11:21:30
Problema Invers Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.18 kb
Raporteaza aceasta sursa 
var f,g:text;
    i,n:longint;
BEGIN
assign(f,'invers.in');
reset(f);
read(f,n);
close(f);

assign(g,'invers.out');
rewrite(g);
for i:=1 to n do
writeln(g,'DA');
close(g)
END.