Cod sursa(job #121001)

Utilizator florin_marius90Florin Marius Popescu florin_marius90 Data 7 ianuarie 2008 16:21:58
Problema Economie Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.14 kb
Raporteaza aceasta sursa 
var i,p,q:integer;
    g:text;
begin
assign(g,'economie.out');
rewrite(g);
q:=10;
p:=2;
for i:=p to q do
write(g,2);
close(g);
end.