Cod sursa(job #9645)
| Utilizator |  Ciocas Radu hitmann |
Data | 27 ianuarie 2007 16:31:47 |
|---|---|---|---|
| Problema | Amenzi | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Unirea 2007, clasele 11-12 | Marime | 0.32 kb |
program amenzi;
var n,m,k,p:integer;
procedure citire;
var f:Text;
begin
assign(f,'amenzi.in'); reset(f);
read(f,n,m,k,p);
close(f);
end;
procedure afis;
var g:text;
i:integer;
begin
assign(g,'amenzi.out'); rewrite(g);
for i:=1 to p do writeln(g,-1);
close(g);
end;
begin
citire;
afis;
end.
