IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задача на тему "Функции"
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 81
Пол: Мужской

Репутация: -  0  +


Условие:
Прикрепленное изображение

Немогу понять что такое норма и что обозначает та формула в конце, помогите разобраться плиз.

Вот пока что знаю набросал:
program wersdfg;
function f1(i,j:integer):integer;(p:array[1..m,1..n] of real):real;
begin
writeln('vvedite elementi matrici');
for i:=1 to n do begin
write(i:2, '-я строка: ');
for j:=1 to n do read(p[i,j]);
end;
const m=4;n=3;
var a,b,c:array[1..m,1..n] of real;i,j:integer;
begin
readln(f1(i,j,p));
end.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Пионер
**

Группа: Пользователи
Сообщений: 70
Пол: Мужской
Реальное имя: Мартын

Репутация: -  1  +


Вот переделал функцию. Я писал тут, и не проверял, может где ошибся !. Но вроде правельно

function max(s:real;i,j:integer):real;
var a:array[1..4,1..3] of real;
max1:real;
begin
j:=1;
max1:=0;
repeat
for i:=1 to 4 do
s:=s+abs(a[i,j]);
if s>max1 then
max1:=s;
inc(j)
until j<>3 do
end;
max:=max1;
end;



Сообщение отредактировано: sintanial -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
kvadrat   Задача на тему "Функции"   20.05.2008 18:54
klem4   на сколько я понял, речь идет об l-норме: http://…   20.05.2008 21:29
kvadrat   Абсолютных величин, это что такое?   20.05.2008 22:51
kvadrat   Как я понял тут должны быть 2 функции, первая прои…   20.05.2008 23:36
klem4   Модуль числа ( |3| = |-3| = 3)   21.05.2008 16:17
kvadrat   Извиняюсь за случайно созданую ту тему, вот мой ва…   21.05.2008 23:59
kvadrat   на сколько я понял, речь идет об l-норме: http:/…   23.05.2008 0:51
sintanial   Ну я думаю так : Сначало поэлементно складываешь э…   23.05.2008 1:54
sintanial   Вот переделал функцию. Я писал тут, и не проверял,…   23.05.2008 2:24
kvadrat   Блин немогу добиться чтобы матрица вводилась строг…   23.05.2008 3:02
sintanial   Ну во первых ты вводишь матрицу 4 на 4 а не 4 на 3…   23.05.2008 3:06
kvadrat   function mat(n,m:integer):real; var i,j:integer; a…   23.05.2008 3:14
sintanial   У тебя в коде очень много неправильного. Щас сдела…   23.05.2008 3:39
sintanial   Вот я написал. Однако почему то не вычисляется s1,…   23.05.2008 4:22


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 28.03.2024 17:42
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name