|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
03.04.2009, 23:17 | #1 |
Регистрация: 03.04.2009
Сообщений: 7
|
Заданы две матрицы A3х3 и B4х4. Построить таблицу функций y=cx2+d при x є [0; 1] с шагом ∆х=0,1
1. Заданы две матрицы A3х3 и B4х4. Построить таблицу функций y=cx2+d при x є [0; 1] с шагом ∆х=0,1, где с-след матрицы А, а d- след матрицы В. Вычисление следа матрицы оформить в виде подпрограммы – процедуры.
2. Дана строка символов, среди которых есть одна скрывающаяся скобка. Вывести на экран все символы, расположенные внутри этих скобок. 3. Вычислить Z=(S1+S2)/2, где S1-сумма положительных элементов массива X(18);S2-сумма отрицательных элементов массива Y(15). Обе суммы вычислить в одной подпрограмме-функции. |
03.04.2009, 23:30 | #2 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Ваши наработки где?
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
03.04.2009, 23:32 | #3 |
Регистрация: 03.04.2009
Сообщений: 7
|
1. След матрицы (NxN) - это сумма элементов главной диагонали.
Следовательно в цикле от 1 то N вычисляем его. Function Sled(M:array...):real; var i:integer; s:real; Begin s:=0; for i:=1 to n do s:=s+M[i,i]; End; |
03.04.2009, 23:44 | #4 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Немножко можно подправить
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
Последний раз редактировалось alex_fcsm; 04.04.2009 в 00:10. |
03.04.2009, 23:46 | #5 |
Регистрация: 03.04.2009
Сообщений: 7
|
А как насчёт двух других, СРОЧНО НАДО!!! PLEASE))
|
03.04.2009, 23:48 | #6 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Эти все задачи решаются за полчаса. Просто подумайте. Если не получается выкладывайте код - подтолкнем в нужном направлении.
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
03.04.2009, 23:49 | #7 |
Регистрация: 03.04.2009
Сообщений: 7
|
В этом и проблема, Что за код???
|
03.04.2009, 23:50 | #8 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Решение ВАШЕ показывайте. Чтобы Вы сами что-то сделали, а не просто копипастили, тем более Вам это нужно.
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
03.04.2009, 23:59 | #9 |
Регистрация: 03.04.2009
Сообщений: 7
|
2.
sum:=0; for i:=1 to 18 begin if x[i]>0 then sum:=sum+x; end; sum1:=0; for i:=1 to 15 begin if y[i]<0 then sum1:=sum1+x; end; z:=sum+sum1/2; |
04.04.2009, 00:08 | #10 | |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Цитата:
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Типы аргументов при перегрузке функций | Arkuz | Общие вопросы C/C++ | 4 | 24.02.2009 01:16 |
Две задачки на матрицы и одна на сумму бесконечного сходящегося ряда... Кто сможет помочь? | GorNikSar | Паскаль, Turbo Pascal, PascalABC.NET | 10 | 13.01.2009 04:59 |
Занесение Данных в таблицу при помощи Query | Avalonix | БД в Delphi | 9 | 29.05.2008 20:13 |
как разбить таблицу при копировании | StasSv | Microsoft Office Excel | 3 | 11.02.2008 10:23 |