Выбери верный ответ.Для вывода данных из оперативной памяти на экран используется оператор:listenwritevarbegin

используется оператор write

Объяснение:

program massiv;

const Sz = 100; // Размер массива

var

 a: array [1..Sz] of integer;

 i: integer;

 max: integer;

 counter: integer;

 

begin

 max:=0;

 counter:=0;

 for i:=1 to Sz do begin

   a[i] := random(26) + 10;

   if a[i] > max then begin

       max := a[i];

       end;

   end;

   writeln('Элементы массива: ');

 for i:=1 to Sz do begin

   write(a[i],' ');

   if a[i] = max then begin

       counter := counter + 1;

       end;

   end;

   writeln('');

   writeln('Максимальный элемент: ', max);

   writeln('Кол-во таких элементов ', counter);

end.

Объяснение:

program massiv;

const Sz = 100; // Размер массива

var

 a: array [1..Sz] of integer;

 i: integer;

 max: integer;

 counter: integer;

 

begin

 max:=0;

 counter:=0;

 for i:=1 to Sz do begin

   a[i] := random(26) + 10;

   if a[i] > max then begin

       max := a[i];

       end;

   end;

   writeln('Элементы массива: ');

 for i:=1 to Sz do begin

   write(a[i],' ');

   if a[i] = max then begin

       counter := counter + 1;

       end;

   end;

   writeln('');

   writeln('Максимальный элемент: ', max);

   writeln('Кол-во таких элементов ', counter);

end.

Объяснение: