24.01.2011, 19:39 | #1 (permalink) |
Member
Регистрация: 24.01.2011
Сообщений: 12
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Задача с матрицей. Нужна проверка специалиста.
Проверьте пожалуйста если я правильно написала код программы.... [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. Благодарю за помощь. |
24.01.2011, 19:39 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Вам скорее всего будет интересно прочитать похожие темы Нужен совет специалиста Помогите с матрицей Нужна помощь специалиста Москва и область. Прожарка видеочипа ноутбука. Ищу специалиста. Нужен взгляд специалиста в апгрейдах Напишите 2 программы с матрицей |
24.01.2011, 19:59 | #4 (permalink) |
Member
Регистрация: 24.01.2011
Сообщений: 12
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Дана матрица G(n,m). Переписать элементы её главной диагонали в одномерный массив H. Вывести оба массива (n=9, m=6).
Это все что дано... больше ничего нет. |
24.01.2011, 20:02 | #5 (permalink) |
404
Регистрация: 10.01.2010
Сообщений: 1,749
Записей в дневнике: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 3868
|
я тебе в личку( справа сверху Личные сообщения) отправил свой адрес если есть агент то давай через него.
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
24.01.2011, 20:42 | #6 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Полный бред! Хотел бы я понять, что вы тут вдвоем усиленно решаете? Ибо сколь я понимаю в медицине, диагонали (главная и побочная) бывают ТОЛЬКО у квадратных матриц. Для матриц неквадратных (прямоугольных) понятие "диагональ" не вводится. И о каких "обоих массивах" речь?
|
24.01.2011, 20:46 | #7 (permalink) |
404
Регистрация: 10.01.2010
Сообщений: 1,749
Записей в дневнике: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 3868
|
вот и я пытаюсь узнать какая задача была изначально. оба массива как я понял, это матрица и массив в котором диагональ. я так понимаю в задаче значения m и n не фиксированы. хотя все равно зачем было указывать разными буквами если это одно и тоже число. непонятно
|
29.01.2011, 11:10 | #8 (permalink) |
Banned
Регистрация: 25.01.2011
Сообщений: 27
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 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. |
29.01.2011, 11:18 | #9 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Так - продолжается безграмотный флуд.
Вы хоть удосужились прочесть посты выше, из которых следует, что сама формулировка задачи - некорректна? Вижу, что нет. Знаете что - отдохните денек в порядке первого предупреждения. И займитесь исправлением своего бредового кода в теме Паскаль, проверочная работа. Повторяю - если программа не будет отлажена, мы расстаемся уже навсегда. |
30.01.2011, 16:14 | #10 (permalink) |
Banned
Регистрация: 25.01.2011
Сообщений: 27
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Уважаемый Vladimir_S вы сами написали, что главная диагональ есть только в квадратной матрице. И следуя вашему высказыванию и некорректному условию я написал задачу.
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Метки |
матрица, паскаль |
|
|