Паскаль / do9 / iriepas201 / Irie Pascal / samples / rm

//*************************************************
// This program removes (i.e. erases) a file
// First it asks for the name of the file
// Then it assigns the name to a file variable
// Finally it calls 'erase' on the file variable
//************************************************
program rm(input, output);
var
   fn : filename;
   f : binary;
begin
   write('Which file do you want to delete? ');
   readln(fn);
   assign(f, fn);
   erase(f);
end.