mu
0 / 0 / 0
Регистрация: 20.01.2012
Сообщений: 20
1

Создать новый файл той же структуры, содержащий матрицу, транспонированную к исходной.

06.04.2012, 21:49. Показов 1562. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дан файл вещественных чисел, содержащий элементы прямоугольной матрицы (по строкам), причем первый элемент файла содержит количество столбцов матрицы. Создать новый файл той же структуры, содержащий матрицу, транспонированную к исходной.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.04.2012, 21:49
Ответы с готовыми решениями:

Если на главной диагонали этой матрицы содержатся пробелы, то в новый файл записать транспонированную матрицу данной матрицы
Дан файл, содержащий матрицу символов (количество строк равно их длинам). Если на главной диагонали...

Дан файл целых чисел. Создать новый файл, содержащий те же элементы, что и исходный файл, но в обратном порядке
Пожалуйста, помогите решить задачу в PascalABC!!! Дан файл целых чисел. Создать новый файл,...

Дано число k и текстовый файл, содержащий более k строк. Создать новый текстовый файл, содержащий k последних строк
И снова всем привет) Помогите пожалуйста со следующим заданием: Дано число k (<10) и текстовый...

Создать новый файл, содержащий только отрицательные числа.
Дан текстовый файл целых чисел. Создать новый файл, содержащий только отрицательные числа. В...

1
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
07.04.2012, 11:38 2
Лучший ответ Сообщение было отмечено mu как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
uses crt;
var f,g:file of real;
    n,m,i,j:integer;
    a:real;
begin
randomize;
assign(f,'f1');
rewrite(f);
assign(g,'f2');
rewrite(g);
//запишем в файл построчно матрицу 7х5
a:=5;
write(f,a);
for i:=1 to trunc(a)*7 do
 begin
  a:=10*random;
  write(f,a);
 end;
//выведем ее в виде таблицы
reset(f);
writeln('Записанная матрица:');
read(f,a); //читаем кол. столбцов
m:=trunc(a);//в целый тип
j:=0;
for i:=1 to filesize(f)-1 do
 begin
  read(f,a);
  write(a:5:2);
  j:=j+1;
  if j=m then
   begin
    j:=0;
    writeln;
   end;
 end;
seek(f,0); //в начало файла
n:=(filesize(f)-1) div m; //кол. столбцов в транспонированной
for i:=1 to m do
for j:=0 to n-1 do
 begin
  seek(f,i+j*m);
  read(f,a);
  write(g,a);
 end;
close(f);
writeln;
reset(g);
writeln('Транспонированная матрица:');
j:=0;
for i:=0 to filesize(g)-1 do
 begin
  read(g,a);
  write(a:5:2);
  j:=j+1;
  if j=n then
   begin
    j:=0;
    writeln;
   end;
 end;
close(g);
 
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.04.2012, 11:38
Помогаю со студенческими работами здесь

Создать новый файл с именем S, содержащий ненулевую часть произведения A*B
Помогите, пожалуйста, исправить программу до рабочего состояния, возникли ошибки. (очень...

Создать новый файл, содержащий матрицу, транспонированную к исходной
Помогите пожалуйста решить. Дан файл вещественных чисел, содержащий элементы прямоугольной матрицы...

Файл содержит количество столбцов матрицы. Создать файл той же структуры, содержащий произведение А*В
Задача: Даны два файла вещественных чисел с именами NameA и NameB, содержащие элементы...

Создать новый файл, содержащий элементы матрицы, транспонированной к исходной
Дан файл вещественных чисел, содержащий элементы квадратной матрицы (по строкам). Создать новый...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru