Запишите код программы с операторов интегрированной среды программирования для заданного алгоритма.по lazarus

#include <iostream>

using namespace std;

int main()

{

   setlocale(LC_ALL, "Russian");

   int max = 0;  

   char str[80];  

   char* p = str;  

   char* j = p;  

   char* mx = nullptr;  

   int count;  

   cout << "Введите строку \nМаксимальный размер: " << sizeof(str) << endl;  

   cin >> str;  

   while (*p != '\0')  

   {

       count = 0;  

       j = str;  

       for (int i = 0; i < sizeof(str) - 1; i++)  

       {  

           if (((short)*p) == ((short)*j))  

               count++;  

           if ((count >= max) && (((short)*p) > 47 && ((short)*p) < 58))  

           {

               max = count; mx = p;

           }  

           j++;                                                  

       }

       *p++;  

   }

   if (max > 0)  

       cout << "Наиболее часто встречается число " << *mx << " ,встретилось " << max << " раза" << endl;  

   else

       cout << "В строке нет ни одного числа\n";  

   return 0;

}

#include <iostream>

#include <fstream>

#include <ctime>

using namespace std;

int main() {

setlocale(LC_ALL, "Russian");

srand(time(NULL));

char buff[50];

int N;

char buffs[25];

cout << "Сколько будет элементов?(выберите четное число) ";

cin >> N;

ofstream fout("number.txt");

if (fout.is_open()) {

 for (int i = 0; i < N; i++) {

  fout << rand() % 10;

 }

 fout.close();

}

else {

 cout << "Невозможно открыть файл";

}

cout << "Исходный файл: " << endl;

ifstream fin("number.txt");

fin >> buff; //считывание из файла

fin.close();

for (int i = 0; i < N; i++)

 cout << buff[i] << " ";

cout << endl << endl;

cout << "Изменённый файл: " << endl;

ofstream del1("first.txt");

for (int i = 0; i < N / 2; i++) {

 del1 << buff[i];

}

del1.close();

ifstream IL("number.txt");

IL >> buffs;

IL.close();

for (int i = 0; i < N / 2; i++) {

 cout << buffs[i] << ' ';

}

return 0;

}