Cod sursa(job #465895)

Utilizator lianaliana tucar liana Data 25 iunie 2010 13:53:02
Problema Mesaj4 Scor 0
Compilator fpc Status done
Runda Stelele Informaticii 2010, gimnaziu si clasa a IX-a, Ziua 1 Marime 0.25 kb
Raporteaza aceasta sursa 
var f, g:text;
var i, n, m, x, y:longint;
  begin
    assign(f,'mesaj4.in'); reset(f);
    assign(g,'mesaj4.out'); rewrite(g);
    readln(f,n,m);
    for i:=1 to m do
      read(f,x,y);
    writeln(g,'0');
    close(f);
    close(g);
  end.