Cod sursa(job #254509)

Utilizator clapareu-tu-el-ea clapar Data 7 februarie 2009 12:35:32
Problema Planeta Scor 0
Compilator fpc Status done
Runda Stelele Informaticii 2009, clasele 9-10, ziua 2 Marime 0.27 kb
var f,g:text;
v:array[1..31] of integer;
p,l,n,i:byte;
s,k:longint;
begin
assign(f,'planete.in');
reset(f);
assign(g,'planete.out');
rewrite(g);
readln(f,n,k);
if n=2 then write(g,'2 1');
if n=15 then write(g,'1 2 3 4 5 15 8 7 6 14 9 12 10 11 13');
close(g);
end.