Обработка файлов. Типизированные файлы

@Михаил8888 · Регистрация: 04.05.2017

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

Составьте программу, определяющую чаще всего встречающуюся компоненту файла f.

@JuriiMW · 12.10.2017, 07:02

Что за файл такой „f“?

@ZX Spectrum-128 · 12.10.2017, 07:49

Определить чаще всего встречающуюся компоненту файла

@Михаил8888 · 16.10.2017, 15:00 **[ТС]**

просто файла, файл и это f, при его описании

@Соколиный глаз · 16.10.2017, 16:05

Например, так:
Добавлено через 1 минуту

Pascal

const
  Path1 = 'C:\Ilya\AlgoРитмы\Файл1.txt';
 
begin
  Writeln(ReadAllLines(Path1).SelectMany(x->x.ToWords()).GroupBy(x -> x).OrderByDescending(x -> x.Count()).First.Key);
end.

Добавлено через 2 минуты
Для файла:
1 2
2
4 2
5
1 7 2
5
1 3 2
Выведет 2.

Добавлено через 3 минуты
Но это не для типизированных файлов. Для типизированных подумаю ща.

Добавлено через 4 минуты
Для типизированных, вроде так:

Pascal

const
  Path1 = 'C:\Ilya\AlgoРитмы\Файл1.txt';
 
begin
  Writeln(System.IO.File.ReadAllBytes(Path1).GroupBy(x -> x).OrderByDescending(x -> x.Count()).First.Key);
end.

Добавлено через 1 минуту

Не по теме:

Хотя, я не уверен, но хотел бы узнать, если мой вариант неверный, правильный ответ, например от volvo.

@volvo · 16.10.2017, 17:04

Сообщение от Volobuev Ilya

но хотел бы узнать, если мой вариант неверный, правильный ответ

Твой вариант верен только для file of byte. Для любого другого типа компонент будут проблемы. Скажем, если файл целых (file of integer) создавался вот так:

Pascal

var 
  f : file of integer;
  
begin
  assign(f, 'x.dat'); reset(f);
  write(f, 1, 2, 3, 4, 2, 5, 1, 7, 2, 5, 1, 3, 2);
  close(f);
end.

, то обрабатывать его нужно, приводя каждые sizeof(integer) последовательных байт к integer-у, и только потом уже делать всё остальное:

Pascal

begin
  Writeln(System.IO.File.ReadAllBytes('x.dat').Batch(sizeof(integer), v -> System.BitConverter.ToInt32(v.ToArray, 0)).
    GroupBy(x -> x).OrderByDescending(x -> x.Count()).First.Key);
end.

@Михаил8888 0 / 0 / 0 Регистрация: 04.05.2017 Сообщений: 58
		1
	Обработка файлов. Типизированные файлы 11.10.2017, 21:54. Показов 479. Ответов 5 Метки нет (Все метки) Составьте программу, определяющую чаще всего встречающуюся компоненту файла f. 0

@JuriiMW 5068 / 2639 / 2349 Регистрация: 10.12.2014 Сообщений: 10,007
	12.10.2017, 07:02	2
	Что за файл такой „f“? 0

@ZX Spectrum-128 6809 / 4566 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	12.10.2017, 07:49	3
	Определить чаще всего встречающуюся компоненту файла 0

@Михаил8888 0 / 0 / 0 Регистрация: 04.05.2017 Сообщений: 58
	16.10.2017, 15:00 [ТС]	4
	просто файла, файл и это f, при его описании 0

	16.10.2017, 17:04

Опции темы