Указатели для упорядочения строк текстового файла в алфавитном порядке

@Maria_Добрая · Регистрация: 17.10.2010

Author24 — интернет-сервис помощи студентам

Написать программу для упорядочения строк текстового файла в алфавитном порядке используя Указатели.

Требования к программе:
создать программу по следующему алгоритму:
1) вывести сообщение "ввести имя файла";
2) ввести имя файла;
3) открыть файл для чтения;
4) все строки файла скопировать в массив;
5) файл закрыть;
6) строки массива отсортировать;
7) вывести сообщение "ввести название упорядоченного файла";
8) ввести имя файла;
9) создать новый файл;
10) строки массива записать в файл;
11) закрыть файл;

@ZzzzoOk · 04.04.2013, 22:06

Pascal

var
a: array[1..1000] of string;
i, j: integer;
fname: string;
inp, outp: text;
 
begin
  writeln("ввести имя файла"); { 1) }
  readln(fname);
  assign(inp, fname);
  reset(inp);
  i:=1;
  while not EOF(inp) do begin
    readln(inp, a[i]);
    inc(i);
  end;
  close(inp);
  for i:=1 to length(a)-1 do
    for j:=i+1 to length(a) do
      if a[j][1]<a[i][1] then begin
        s:=a[i];
        a[i]:=a[j];
        a[j]:=s;
      end;
  writeln("ввести название упорядоченного файла");
  readln(fname);
  assign(outp, fname);
  rewrite(outp);
  for i:=1 to length(a) do
   writeln(outp, a[i]);
  close(outp);
end.

Написал и понял, что надо с указателями

Я без понятия что это, а код мб пригодится..

@Maria_Добрая 0 / 0 / 0 Регистрация: 17.10.2010 Сообщений: 63
		1
	Указатели для упорядочения строк текстового файла в алфавитном порядке 04.04.2013, 21:25. Показов 1078. Ответов 1 Метки нет (Все метки) Написать программу для упорядочения строк текстового файла в алфавитном порядке используя Указатели. Требования к программе: создать программу по следующему алгоритму: 1) вывести сообщение "ввести имя файла"; 2) ввести имя файла; 3) открыть файл для чтения; 4) все строки файла скопировать в массив; 5) файл закрыть; 6) строки массива отсортировать; 7) вывести сообщение "ввести название упорядоченного файла"; 8) ввести имя файла; 9) создать новый файл; 10) строки массива записать в файл; 11) закрыть файл; 0

	04.04.2013, 22:06

Указатели для упорядочения строк текстового файла в алфавитном порядке

Решение