Технический форум - Задача с матрицей. Нужна проверка специалиста.

Страница 1 из 2

Показывать 40 сообщений этой темы на одной странице

Технический форум (http://www.tehnari.ru/)

- Помощь студентам (http://www.tehnari.ru/f41/)

- - Задача с матрицей. Нужна проверка специалиста. (http://www.tehnari.ru/f41/t46285/)

Ella	24.01.2011 19:39

Задача с матрицей. Нужна проверка специалиста.

Дана матрица G(n,m). Переписать элементы её главной диагонали в одномерный массив H. Вывести оба массива (n=9, m=6).

Проверьте пожалуйста если я правильно написала код программы....

[I]program matrice;
uses crt;
type tab=array [1..9, 1..6] of integer;
var G:array [1..9, 1..6] of tab;
B: tab;
i,j,n,m: integer;
begin
clrscr;
write ('introduce n,m');
readln (n,m);
for i:=1 to n do
for j:=1 to m do
read (G[i,j]);
write ('главная диагональ');
for i:=1 to no do
begin
B[i]:=G[i,i];
write (B:4);
end;
readln;
end.

Благодарю за помощь.

Fenix

24.01.2011 19:44

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

Ella	24.01.2011 19:47

нет, не обьязательно

Ella	24.01.2011 19:59

Дана матрица G(n,m). Переписать элементы её главной диагонали в одномерный массив H. Вывести оба массива (n=9, m=6).

Это все что дано... больше ничего нет.

Fenix

24.01.2011 20:02

я тебе в личку( справа сверху Личные сообщения) отправил свой адрес если есть агент то давай через него.

Vladimir_S

24.01.2011 20:42

Цитата:

Сообщение от Ella (Сообщение 452270)

Полный бред! Хотел бы я понять, что вы тут вдвоем усиленно решаете? Ибо сколь я понимаю в медицине, диагонали (главная и побочная) бывают ТОЛЬКО у квадратных матриц. Для матриц неквадратных (прямоугольных) понятие "диагональ" не вводится. И о каких "обоих массивах" речь?

Fenix

24.01.2011 20:46

вот и я пытаюсь узнать какая задача была изначально. оба массива как я понял, это матрица и массив в котором диагональ. я так понимаю в задаче значения m и n не фиксированы. хотя все равно зачем было указывать разными буквами если это одно и тоже число. непонятно

Mr.Програмист

29.01.2011 11:10

Я всё исправил вот листинг:

Код:

program matrice;

uses crt;

var G:array [1..9, 1..6] of integer;

B:array [1..100] of integer;

i,j,n,m: integer;

begin

clrscr;

write ('introduce n,m');

readln (n,m);

for i:=1 to n do

for j:=1 to m do

read (G[i,j]);

write ('главная диагональ');

for i:=1 to n do

for j:=i to i do

begin

B[i]:=G[i,j];

write (B[i]:4);

end;

Writeln;

for i:=1 to n do

begin

for j:=1 to m do

begin

Write(g[i,j]);

end;

Writeln;

end;

readln;

end.

Писал на Pascal ABC (Если не будет работать).

Vladimir_S

29.01.2011 11:18

Цитата:

Сообщение от Mr.Програмист (Сообщение 454961)

Я всё исправил вот листинг:

Так - продолжается безграмотный флуд.
Вы хоть удосужились прочесть посты выше, из которых следует, что сама формулировка задачи - некорректна? Вижу, что нет.
Знаете что - отдохните денек в порядке первого предупреждения. И займитесь исправлением своего бредового кода в теме http://www.tehnari.ru/f41/t45671/. Повторяю - если программа не будет отлажена, мы расстаемся уже навсегда.

Mr.Програмист

30.01.2011 16:14

Уважаемый Vladimir_S вы сами написали, что главная диагональ есть только в квадратной матрице. И следуя вашему высказыванию и некорректному условию я написал задачу.

Часовой пояс GMT +4, время: 08:04.

Страница 1 из 2

Показывать 40 сообщений этой темы на одной странице