Помогите пожалуйста с задачей delphi
помогите плиз..нужно сделать прогу..
Составить подпрограмму, которая в матрице Y(m,n) меняет местами 1-й и k-й столбец (1<m). C помощью подпрограммы поменять местами первый и последний столбцы матриц A(12,9), C(7,11), и третий и пятый столбц матрицы B(8,15). Исходные и преобразованные матрицы вывести на экран дисплея. Элементы входных матриц вычисляются по формулам:
A(c индексом i,j)=tg(j)+e^cos(i);
B(c индексом i,j)=sin(3.2j+4.2)+e^tg(1.5i);
C(c индексом i,j)=cos(12.4j+1).
Заранее благодарю!
Составить подпрограмму, которая в матрице Y(m,n) меняет местами 1-й и k-й столбец (1<m). C помощью подпрограммы поменять местами первый и последний столбцы матриц A(12,9), C(7,11), и третий и пятый столбц матрицы B(8,15). Исходные и преобразованные матрицы вывести на экран дисплея. Элементы входных матриц вычисляются по формулам:
A(c индексом i,j)=tg(j)+e^cos(i);
B(c индексом i,j)=sin(3.2j+4.2)+e^tg(1.5i);
C(c индексом i,j)=cos(12.4j+1).
Заранее благодарю!
-
- Сообщения: 296
- Зарегистрирован: 13 фев 2008, 20:10
- Откуда: Беларусь. Орша
- Контактная информация:
Матрица задается Random'но или считывается с формы?
Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.
C_O_D_E, спасибо что откликнулась - получается матрица Y(m,n) заполняется через random - целыми числами - а матрицы А, B и С заполняются через формулы...
-
- Сообщения: 296
- Зарегистрирован: 13 фев 2008, 20:10
- Откуда: Беларусь. Орша
- Контактная информация:
1)
x:=y[i,1];
y[i,1]:=y[i,k];
y[i,k]:=x;
end;
аналогично и в
For i:=1 to m do beginY(m,n) меняет местами 1-й и k-й столбец (1<m)
x:=y[i,1];
y[i,1]:=y[i,k];
y[i,k]:=x;
end;
аналогично и в
поменять местами первый и последний столбцы матриц A(12,9), C(7,11), и третий и пятый столбц матрицы B(8,15).
Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.
Спасибо! Буду пробовать!
-
- Сообщения: 296
- Зарегистрирован: 13 фев 2008, 20:10
- Откуда: Беларусь. Орша
- Контактная информация:
Знаете как задавать Random'но или подсказка нужна?
Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.
Подсказка очень нужна.. помогите если можно.. я уже совсем запуталась
Возможно, Вы не совсем правильно поняли, что требуется сделать-заполнять random'ом ничего не нужно, матрицы Y как таковой в программе нет, она используется для описания принципа работы подпрограммы. В программе должны присутствовать только матрицы A, B, C , которые заполняются с помощью формул, указанных в задаче.
Ни что так не ограничивает фантазию программиста, как компилятор...
Спасибо Вам огромное что обьясняете мне.. и пытаетесь помочь, но не получается у меня пока
Добрый вечер! Снова обращаюсь к Вам за помощью.. ну вообщем прогу написать получилось почти.. есть небольшая проблемка у меня - помогите написать на Delphi 2 формулы sin(3.2j+4.2)+e^tg(1.5i) и tg(j)+e^cos(i) только не через Power - он у меня не работает - пишет File no found: Power.dcu Помогите плиз...