Новые сообщения · Правила  
Страница 1 из 11
Модератор форума: Berestovskiy 
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Функция
Функция
Офрмить в виде функции нахождение максимума двумерного массива A[N,M].
1 | Автор: xit_lis | 2011-06-19, 11:18   |  Репутация: [ + 0 ]
var
i,j,n,m,p,pm:integer;
begin
read(n,m);
for i:=1 to n do
for j:=1 to m do begin
read(p);
if p>pm then pm:=p;end;
writeln(pm);
end.

"Спасибо" принимается повышением репутации ( Зелёный плюсик:) ). Спасибо


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2011-06-19, 18:36   |  Репутация: [ + 211 ]
как это же не через функцию
3 | Автор: xit_lis | 2011-06-19, 19:22   |  Репутация: [ + 0 ]
Я это понимаю, но, чёрт возьми, на данную задачу нет толку писать функцию по нахождению максимального элемента
Т.е. зачем делать что-то сложное если можно всё сделать гораздо проще?


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
4 | Автор: Berestovskiy | 2011-06-20, 00:21   |  Репутация: [ + 211 ]
препад сказал написать через функцию
5 | Автор: xit_lis | 2011-06-20, 08:39   |  Репутация: [ + 0 ]
1

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
6 | Автор: Berestovskiy | 2011-06-20, 09:49 | Изменено: Berestovskiy - Пн, 2011-06-20, 10:02   |  Репутация: [ + 211 ]
и что это знавчит? кто нибудь помочь может?
7 | Автор: xit_lis | 2011-06-20, 16:14   |  Репутация: [ + 0 ]
Держи))

function max(n,m,p,pm:integer):integer;
var
i,j:byte;
begin
for i:=1 to n do
for j:=1 to m do begin
read(p);
if p>pm then begin pm:=p;max:=pm;end;end;end;
var
n,m,p,pm:integer;
begin
read(n,m);
writeln(max(n,m,p,pm));
end.

"Спасибо" принимается повышением репутации ( Зелёный плюсик:) ). Спасибо


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
8 | Автор: Berestovskiy | 2011-06-20, 18:52 | Изменено: Berestovskiy - Пн, 2011-06-20, 19:00   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
8 | Автор: Berestovskiy | 2011-06-20, 18:52 | Изменено: Berestovskiy - Пн, 2011-06-20, 19:00   |  Репутация: [ + 211 ]
Berestovskiy а ты проверяешь код перед отправкой?

If you can't make it GOOD make it LOOK GOOD. B.Gates
9 | Автор: DoVe | 2011-06-20, 23:15   |  Репутация: [ + 48 ]
Quote (DoVe)
Berestovskiy а ты проверяешь код перед отправкой?


Безусловно..примерно десяток вводов сделал и получил правильный вывод, а что есть ввод при котором выводит не правильный результат?


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
10 | Автор: Berestovskiy | 2011-06-21, 00:11   |  Репутация: [ + 211 ]
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Функция
Страница 1 из 11
Поиск: