с информатикой, сегодня нужно сдать, фото прилагается​

Какую операционную систему используешь? если Linux то:
1) g++ -c mprog.cpp -o mprog.o (-o "output" - файл вывода, -c означает "только компиляция", т.е. не связывать твой файл со сторонними билиотеками типа libc, получим просто файл с машинными командами особо ни к чему не привязанный ".o" - object file, если особо интересно, что же там лежит, можно вызвать "objdump -D mprog.o" либо g++ -S -masm=intel -O0 mprog.cpp, вывод будет в mprog.s)
2) g++ -c prog.cpp -o prog.o (то же самое)
3) g++ prog.o mprog.o -o prog (выполняем связывание двух обектных файлов между собой и со стандартными библиотеками, опять же новое содержимое можно посмотреть "objdump -D mprog")
4) ./prog - запустить твою программу и передать управление в начало функции main (и не важно, в каком файле она лежала, главное, чтобы была одна, хотя иначе шаг 3 выдаст ошибку)
Если винда, то запусти поиск по диску С "mingw32-g++.exe" и через командную строку вызывай для него
1) ...путь...\mingw32-g++.exe -c mprog.cpp -o mprog.o
2) ...путь...\mingw32-g++.exe -c prog.cpp -o prog.o
3) ...путь...\mingw32-g++.exe prog.o mprog.o -o prog.exe 
4) prog.exe

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.

Объяснение: