Turbo Pascal - Массив

[tts]

В общем, покопавшись по форуму так и не смог собрать все в кучу.. а надо срочно помогите плиз..

Создать целочисленный двумерный массив, имеющий 8 строк и 10 столбцов с помощью генератор случайных чисел от 0 до 100. Вывести на дисплей наибольший и наименьший элементы этого массива, указав на пересечении каких строк и столбцов находятся эти элементы.
заранее спасибо.

[BHy4ok]

В общем, покопавшись по форуму так и не смог собрать все в кучу.. а надо срочно помогите плиз..

Вранье.
Сразу рядом с твоей темой разбирались массивы. При чем довольно похожая задача.

Создать целочисленный двумерный массив, имеющий 8 строк и 10 столбцов с помощью генератор случайных чисел от 0 до 100. Вывести на дисплей наибольший и наименьший элементы этого массива, указав на пересечении каких строк и столбцов находятся эти элементы.

Я бы все-таки сделал массив немного поменьше ибо практически всегда он будет выдавать одни и те же значения(max, min).
[syntax='Pascal']
uses
Crt;
var
i,j,max,min,pozi,pozj,pozi1,pozj1:integer;
a:array[1..100,1..100] of integer;
label 1;
begin
1:
ClrScr;
min:=100;
max:=0;
for i := 1 to 8 do begin
for j := 1 to 10 do begin
a[i,j]:=random(100);
write(a[i,j],' ');
if max<a[i,j] then
begin
max:=a[i,j];
pozi:=i;
pozj:=j;
end;
if a[i,j]<min then
begin
min:=a[i,j];
pozi1:=i;
pozj1:=j;
end;
end;
writeln;
end;
writeln;
writeln('Maximum: stroka "',pozi,'" stolbec "',pozj,'" := ',max);
writeln('Minimum: stroka "',pozi1,'" stolbec "',pozj1,'" := ',min);
writeln;
writeln('Press "Ctrl + C" to Exit, or "Enter" to try again');
readln;
goto 1;
readln;
end.
[/syntax]

[Oleg_Rus]

в алгортмах однако поднималась эта тема...

[Leisan92]

помогите пожалуйстаа! очень надо!!

1. Вычислить значения 39 элементов одномерного целочисленного массива V в интервале (-10, 10) с использованием генератора случайных чисел.
2. Вычислить среднегеометрическое значение четных по значению элементов второй четверти массива.
3. Определить значение, самое близкое к заданному числу С среди положительных элементво всего массива.
4. Упорядочить положительные элементы второй половины массива по убыванию модулей обратных значений.

заранее спасибо!