Cod sursa(job #26022)
Utilizator | Data | 4 martie 2007 23:49:42 | |
---|---|---|---|
Problema | Zero 2 | Scor | 4 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.17 kb |
var f:text;
i:longint;
begin
assign(f,'zero2.out');
rewrite(f);
for i:=1 to 10 do
writeln(f,0);
close(f);
end.