|
Вопрос # 3 298/ вопрос открыт / |
|
Помогите пожалуйста!!!!!!
Доброго времени суток, уважаемые эксперты!
Дана матрица элементов размером n*n. Получить другую матрицу, в которой все від’ємні элементы непарных рядков умножить на число, которое вводиться пользователем
 |
Вопрос задала: star (статус: Посетитель)
Вопрос отправлен: 17 октября 2009, 13:53
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Написал я тебе функцию:
procedure TransformMatrix(const X: TMatrix; var Y: TMatrix; const Value: Integer);
var
i, j: Integer;
begin
SetLength(Y, Length(X), Length(X[0]));
for i:= 0 to Length(X) - 1 do
for j:= 0 to Length(X[0]) - 1 do
if (X[i, j] < 0) and Odd(j)
then Y[i, j]:= X[i, j] * Value
else Y[i, j]:= X[i, j];
end;
Тестовую программу прицепляю к ответу.
Имей в виду, что нумерация строк и столбцов у меня начинается с нуля.
Если шо не так - говори.
К ответу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки ответа)
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 17 октября 2009, 15:16
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 12; последнее сообщение — 17 октября 2009, 19:09; участников в обсуждении: 5.
|
Егор (статус: 10-ый класс), 17 октября 2009, 13:57 [#1]:
это вопрос к min@y™ 
он у нас лабы/курсачи делает
за пиво!
))
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
|
Егор (статус: 10-ый класс), 17 октября 2009, 13:59 [#2]:
Цитата:
все від’ємні элементы непарных рядков
какие элементы?!!!
min@y™:
ты ей программу тож на украинском напиши
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
|
min@y™ (статус: Доктор наук), 17 октября 2009, 14:03 [#3]:
Цитата:
Помогите пожалуйста!!!!!!
Чем помочь? Написать программу полностью?
Я "Оболонь Магнат" люблю! )
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
star (статус: Посетитель), 17 октября 2009, 14:39 [#4]:
числа со знаком минус
|
|
|
star (статус: Посетитель), 17 октября 2009, 14:45 [#5]:
не смешно я тут сума сойду
|
|
|
min@y™ (статус: Доктор наук), 17 октября 2009, 14:55 [#6]:
Щас напишу функцию.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
Паровоз (статус: 10-ый класс), 17 октября 2009, 15:02 [#7]:
На украинском надо Вадима просить. Однако, похоже у него клавиша F5 сломалась.
|
|
|
min@y™ (статус: Доктор наук), 17 октября 2009, 15:17 [#8]:
Цитата (Паровоз):
На украинском надо Вадима просить. Однако, похоже у него клавиша F5 сломалась.
Бугага!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
star (статус: Посетитель), 17 октября 2009, 16:44 [#9]:
min@y
Ты гений!!!!!!!
|
|
|
min@y™ (статус: Доктор наук), 17 октября 2009, 16:52 [#10]:
Цитата (star):
Ты гений!!!!!!!
Дааа? Тогда где моё пиво?
В чём гениальность?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
Ерёмин А.А. (статус: *Администратор), 17 октября 2009, 19:02 [#11]:
Автору вопроса: у нас пишут по-русски, в будущем пожалуйста учтите это.
|
|
|
min@y™ (статус: Доктор наук), 17 октября 2009, 19:09 [#12]:
Цитата (Ерёмин А.А.):
у нас пишут по-русски, в будущем пожалуйста учтите это.
Да ладно, Кэп, не придирайся. Все друг друга поняли, всё нормально.
Я Когда вылез из поезда в Симферополе:
1. Не поверил своим ушам - никто не говорит по-украински;
2. Не поверил своим глазам - город ничем не отличается от моей Рязани.
Аффтар, пиши по-украински (или по-английски) те слова, которые не знаешь по-русски. Я пойму, ничо страшного.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
