Нужна помощь с информатикой!В файле записано не более 100 целых чисел

укажите на каком языке программирования необходимо составить программу

паскаль

какая из сортировок должна употребляться или нет различия

без различия, главное чтобы работало

Var
Файл 1.txt нужно сделать
n,i,j,c1:integer;
a:array[1..100] of integer;
f:text;
begin
 чтение данных с файла 1.txt
 assign(f,'1.txt'); reset(f);
 i:=0;
 while not eof(f) do
 begin
   i:=i+1;
   read(f,a[i]);
 end;
 n:=i;
 close(f);
Сортировка
  for i:=1 to n-1 do
  for j:=i+1 to n do
    if a[i]gt;a[j] then
        begin
         c1:=a[j];
         a[j]:=a[i];
         a[i]:=c1;
        end;
 вывод в файл 2.txt отсортированного массива
  assign(f,'2.txt');  rewrite(f);
  for i:=1 to n do
   write(f,a[i]:5);
  close(f);

 end.