Pagini recente » Diferente pentru implica-te/scrie-articole intre reviziile 122 si 35 | Diferente pentru implica-te/scrie-articole intre reviziile 29 si 28 | Cod sursa (job #271444) | Cod sursa (job #1293390) | Cod sursa (job #117218)
Cod sursa(job #117218)
var i,j,n,k:longint;
f,g:text;
h1,h2,m1,m2,s1,s2,mm1,mm2:word;
begin
assign(f,'tije.in'); reset(f);
assign(g,'tije.out'); rewrite(g);
read(f,n);
for i:=n-1 downto 1 do begin
for j:=n downto 1 do
for k:=1 to i do
writeln(g,j,' ',j+1);
for k:=1 to i do
writeln(g,n+1,' ',1);
end;
close(f); close(g);
end.