Создать двумерный массив размером 5: 5. случайным образом интервал (-300; 300 в 3-ем столбце найти количество положительных элементов. заменить все четные элементы на максимальные.

const n=5;

var a:array[1..n,1..n] of integer;

i,j,k,m:integer;

begin

for i:=1 to n do

begin

for j:=1 to n do

begin

a[i,j]:=random(599)-299;

write(a[i,j]:5)

end;

writeln

end;

writeln;

for i:=1 to n do if a[i,3]>0 then k:=k+1;

if k>0 then writeln('В 3-ем столбце количество положительных элементов равно: ',k)

else writeln('В В 3-ем столбце нет положительных элементов');

writeln;

m:=a[1,1];

for i:=1 to n do

for j:=1 to n do

if a[i,j]>m then m:=a[i,j];

for i:=1 to n do

begin

for j:=1 to n do

begin

if a[i,j] mod 2 = 0 then a[i,j]:=m;

write(a[i,j]:5)

end;

writeln

end;

writeln;

end.

Program z1;
        var a:array[1..100] of integer;
        n,i:byte;ma:integer;
begin
        write('n=');readln(n);
        for i:=1 to n do begin
                write(i,')');readln(a[i])
        end;
        ma:=a[1];
        for i:=1 to n do begin
                if a[i]>ma then begin
                        ma:=a[i]
                end
        end;
        for i:=1 to n do begin
                a[i]:=ma
        end;
        writeln('test n=',n);
        for i:=1 to n do begin
                writeln(a[i])
        end;
        readln
end.

Согласно проведенным исследованиям шифрование — это изменения сообщения или другого документа, обеспечивающее искажение (сокрытие) его содержимого. (Кодирование – это преобразование обычного, понятного, текста в код. При этом подразумевается, что существует взаимно однозначное соответствие между символами текста(данных, чисел, слов) и символьного кода – в этом принципиальное отличие кодирования от шифрования. Часто кодирование и шифрование считают одним и тем же, забывая о том, что для восстановления закодированного сообщения, достаточно знать правило подстановки(замены). Для восстановления же зашифрованного сообщения помимо знания правил шифрования, требуется и ключ к шифру. Ключ понимается нами как конкретное секретное состояние параметров алгоритмов шифрования и дешифрования. Знание ключа дает возможность прочтения секретного сообщения. Впрочем, как вы увидите ниже, далеко не всегда незнание ключа гарантирует то, что сообщение не сможет прочесть посторонний человек.). Шифровать можно не только текст, но и различные компьютерные файлы – от файлов баз данных и текстовых процессоров до файлов изображений.

Да я с копировал но это правильный ответ