Удалила папку с компьютера с программой, теперь не удаляется из панели . что делать в такой ситуации?

Зайди в корзину, если надо восстановить программу

1) var sum, number, n: integer; begin   sum : = 0;   number : = 1;   write('введите n: ');   readln(n);   while (number < = n) do   begin     sum : = sum + number;     number : = number + 2;   end;   write('сумма равна ', sum); end. 2) var prod, number, n: integer; begin   prod: = 1;   number : = 3;   write('введите n:   ');   readln(n);   while (number < = n) do   begin     prod : = prod *  number;     number : = number + 3;   end;   write('произведение равно  ', prod); end. 3) var number, n: integer; begin   number : = 1;   write('введите n:   ');   readln(n);   writeln('таблица: ');   while (number < = n) do   begin     writeln(number: 5, number*number: 5, number*number*number: 5);     number : = number + 1;   end; end.

program tablica; var      n: integer;       i: integer; begin            n : = 15;             for i : = 1 to 17 do      begin            write(n, '*', i, '=', n*i, '  ');             write(n+1, '*', i, '=', (n+1)*i, '  ');             writeln(n+2, '*', i, '=', (n+2)*i);       end;                   readln; end.