Cod sursa(job #37794)

Utilizator raduzerRadu Zernoveanu raduzer Data 25 martie 2007 12:36:55
Problema Regiuni Scor 0
Compilator fpc Status done
Runda preONI 2007, Runda 4, Clasa a 10-a Marime 0.21 kb
Raporteaza aceasta sursa 
var n,m,s:longint;
begin
     assign(input,'regiuni.in');
     reset(input);
     assign(output,'regiuni.out');
     rewrite(output);
     readln(n,m);
     s:=random(m);
     writeln(s);
close(output);
end.