Cod sursa(job #37806)

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