laps(pille, aleksander). laps(jaagup, pille). laps(toomas, jaagup). laps(paula, jaagup). uuring1():- open('vastus5.txt', write, F1), laps(Kes, jaagup), writeln(F1, Kes), false, close(F1) ; halt(0). uuring2():- open('sisend5.txt', read, F2), read_term(F2, Isik, []), laps(Kes, Isik), writeln(Kes), false; halt(0). uuring3():- current_prolog_flag(argv, Argv), writeln(Argv), false.