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

Var i: byte;     ma, mi: real;     a: array [1..100] of real; begin       mi : = 100;       for i : = 1 to 100 do       begin           a[i] : = random(100) / 0.5;           writeln('[', i, '] => ', a[i]);       end;       writeln('');       for i : = 1 to 100 do       begin           if (a[i] > ma) then ma : = a[i];           if (a[i] < mi) then mi : = a[i];       end;       writeln(ma, ' - ', mi, ' = ', ma - mi); end. вот =)

Var i: byte;     alf: array [1..10] of char; begin       alf[1] : = 'а';       alf[2] : = 'е';       alf[3] : = 'ё';       alf[4] : = 'и';       alf[5] : = 'о';       alf[6] : = 'у';       alf[7] : = 'ы';         alf[8] : = 'э';       alf[9] : = 'ю';       alf[10] : = 'я';       for i : = 1 to 10 do           writeln('[', i, '] => ', alf[i]); end. : )