Turbo Pascal - Композиция Двух Двумерных Массивов 100x100

← →
Юлька © (2011-11-09 17:03) [40]

Но я не буду обвинять препода =) Он тут абсолютно ни при чём, он нам, тупорылым студентам, вообще ничего не должен, мы самостоятельно должны обучаться, это же уже не школа! Это вуз! Не маленькие уже! А препод замечательный человек, анекдоты классно рассказывает =)

← →
Dennis I. Komarov © (2011-11-09 17:12) [41]

> Да, лень очень мешается... нашему преподу =) Ибо во время
> семинара он бегает в буфет и в курилку, и как говорят другие
> преподы, в программировании он ни бум-бум...

Что мешает читать книжки?
И потом, исходя из того что код в [0] - написан самостоятельно, знаний вполне должно хватить для решения задачи...

← →
Dennis I. Komarov © (2011-11-09 17:20) [42]

> Jeer © (09.11.11 15:26) [22]
>
> Из дидактических соображений я бы предложил такой вариант:
>
>
> Transpose(B);
> for k := 1 to N do begin
> C[k, 1] := Min(A[k, 1], B[k, 1]);
> for j := 1 to N do
> for i := 1 to N do
> C[k, j] := Max(C[k, j], Min(A[i, j], B[i, j]));
> end;
>
> P.S.
> Реализация Transpose(), Min(), Max() - тривиальна.

А зачем? Только лишние тики тратить...

← →
Jeer © (2011-11-09 17:26) [43]

> А зачем? Только лишние тики тратить...

"Многомерность не сразу и не всем дается." (С)

Если есть способ привести задачу к более простому виду, хотя бы для учебных целей - грех этим не воспользоваться.
К тому же "засвечиваем" одну из стандартных матрчиных операций - транспонирование.

← →
Jeer © (2011-11-09 17:32) [44]

> Юлька © (09.11.11 16:22) [30]
>
> Жду справедливой критики =)
>

1.Научитесь форматировать код, тогда его кто-то будет читать.

2. min и max - стандартные функции из Math в более высоких версиях Pascal.
Следует избегать таких наименований.

← →
Dennis I. Komarov © (2011-11-09 17:34) [45]

Ну, не знаю на сколько она стала проще, спорить не буду...
Но объяснить это преподавателю будет сложнее, ибо в условии строки и столбцы. Кроме того, если транспонирование как таковое ей не известно, тогда вообще чума :) Хотя вроде на I-курсе дают...

← →
Юлька © (2011-11-09 17:37) [46]

Всем спасибо, все замечания непременно учту =)

← →
Омлет © (2011-11-09 17:38) [47]

> Юлька © (09.11.11 16:18) [28]
> max:=-maxint;

Не путай вещественные и натуральные числа.
maxint - это всего лишь 32767 (в 16-ричном паскале).

← →
Омлет © (2011-11-09 17:40) [48]

> в 16-ричном паскале

16-битном )

← →
Dennis I. Komarov © (2011-11-09 17:48) [49]

> > max:=-maxint;

возьми соответствующее значение из массива и не надо выдумывать...

> и как говорят другие преподы, в программировании он ни
> бум-бум...
>

тогда я бы ему другой код бы подсунул... позаумней.

> Jeer © (09.11.11 17:32) [44]

> 1.Научитесь форматировать код, тогда его кто-то будет читать.
>

ставь расширение от Керка - читать легко.

> ставь расширение от Керка - читать легко.
>

Offtop:

Кого читать-то легко ?
Расширение или Керка ? :)
Или расширенного Керка ?

> KilkennyCat © (09.11.11 21:41) [51]
>ставь расширение от Керка - читать легко.

Не, без отступов, даже с подсветкой тяжело читать.

Turbo Pascal - Композиция Двух Двумерных Массивов 100x100 Найти похожие ветки