Cod sursa(job #18530)
| Utilizator |  Pripoae Teodor Anton toni2007 |
Data | 18 februarie 2007 12:32:56 |
|---|---|---|---|
| Problema | Amlei | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | preONI 2007, Runda 2, Clasa a 9-a si gimnaziu | Marime | 0.29 kb |
uses crt;
var a,i:integer;f1,f2:text;
begin
assign(f1,'amlei.in');
assign(f2,'amlei.out');
reset(f1);
rewrite(f2);
Randomize;
a:=random(2);
If a=0 then begin
writeln(f2,'DA');
writeln(f2,'NU');
end
else begin
writeln(f2,'NU');
writeln(f2,'DA');
end;
close(f1);
close(f2);
end.