Вывод матрицы из текстового файла на экран

@Yourk · Регистрация: 19.03.2010

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

Добрый вечер. Пришел с не большой проблемой. Записываю в файл матрицу

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 Procedure enter(var fl:text;var m:mas;var n:integer);
 var i,j:integer;
 Begin
  assign(fl,'file.txt');
  rewrite(fl);
  write('vvdedite pazmer');
  read(n);
  for i:=1 to n do
  begin
   for j:=1 to n do
   begin
    write('a[',i,',',j,']=');
    read(m[i,j]);
    write(fl,m[i,j]);
    write(fl,' ');
   end;
   writeln(fl);
  end;
  close(fl);

Записывается в файле в виде нормальной матрицы, пытаюсь вывести на экран из файла матрицу - выдаёт, правильно, но всё в одну строчку

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Procedure print(var fl:text,n:integer);
 var
 x:integer;
 Begin
  reset(fl);
  while not eof(fl) do
  begin
   repeat
    read(fl,x);
    write(x:3);
   until eoln(fl);
  writeln;
  end;
  close(fl);
 end;

Буду крайне признателен, если кто-нибудь поможет)

@Puporev · 19.03.2010, 19:38

Yourk,Сначала записывай в матрицу ее размер, потом саму матрицу, типа

Pascal
1
2
3
writeln(f,n);
for i:=1 to n do
............

Потом из файла читаешь

Pascal
1
2
3
4
5
6
7
8
9
10
read(f,n);
for i:=1 to n do
 begin
 for j:=1 to n do
  begin
   read(f[a[i,j]); 
   write(a[i,j]:4);
  end;
 writeln;
end;

@Yourk · 19.03.2010, 20:59 **[ТС]**

Большое спасибо! Однако появляется вопрос, а нельзя сделать вывод на экран через eof и eoln простым считыванием из файла в переменную, то есть не занося в матрицу?

@Puporev · 19.03.2010, 21:27

А какой смысл? Нам же матрицу нужно создать, а не набор чисел. Если просто вывести матрицу из файла на экран можно вообще строками считывать.

@Yourk · 19.03.2010, 22:22 **[ТС]**

Понятно. Спасибо за помощь!)

Новые блоги и статьи Все статьи Все блоги /
Вопросы на собеседованиях по микросервисам ArchitectMsa 27.03.2025 Работодатели ищут не просто разработчиков, знающих базовые концепции, а специалистов, разбирающихся в тонкостях масштабирования, отказоустойчивости и производительности. Сейчас на первый план выходят. . .	Взаимодействие Python с REST API py-thonny 27.03.2025 REST API - это архитектурный стиль взаимодействия компонентов распределённого приложения в сети. Python располагает функциональным набором инструментов для работы с REST API и основная библиотека для. . .	sshd restrictions, ssh access limitations jigi33 26.03.2025 sshd restrictions \| ssh access limitations рестрикции доступа на сервер sshd статья: https:/ / www. golinuxcloud. com/ restrict-allow-ssh-certain-users-groups-rhel	Компиляция C++ с Clang API NullReferenced 24.03.2025 Компиляторы обычно воспринимаются как черные ящики, которые превращают исходный код в исполняемые файлы. Мы запускаем компилятор командой в терминале, и вуаля — получаем бинарник. Но что если нужно. . .	Многопоточное программирование в C#: Класс Thread UnmanagedCoder 24.03.2025 Когда запускается приложение на компьютере, операционная система создаёт для него процесс - виртуальное адресное пространство. В C# этот процесс изначально получает один поток выполнения — главный. . .
SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .	Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .

@Yourk 0 / 0 / 0 Регистрация: 19.03.2010 Сообщений: 9
	19.03.2010, 20:59 [ТС]
	Большое спасибо! Однако появляется вопрос, а нельзя сделать вывод на экран через eof и eoln простым считыванием из файла в переменную, то есть не занося в матрицу? 0

@Puporev Почетный модератор 64308 / 47605 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	19.03.2010, 21:27
	А какой смысл? Нам же матрицу нужно создать, а не набор чисел. Если просто вывести матрицу из файла на экран можно вообще строками считывать. 0

@Yourk 0 / 0 / 0 Регистрация: 19.03.2010 Сообщений: 9
	19.03.2010, 22:22 [ТС]
	Понятно. Спасибо за помощь!) 0

Опции темы