Напишите в ячейке н8 функцию для рассчёта количества отсутствующих учеников за субботу, если отсутствующим считается , пропустивший не менее 6 уроков​

#include <iostream>

using namespace std;

int main() {

setlocale(LC_ALL, "Rus");

int mas[17], s = 0, sr = 0, counter = 0, counter_p = 0;

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

 cin >> mas[i];

 if (mas[i] > 0) {

  counter_p++;

  sr += mas[i];

 }

}

sr = sr / counter_p;

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

 if (mas[i] > sr) {

  counter++;

  s += mas[i];

 }

}

cout << "Количество элементов, которые больше среднего арифметического: " << counter << "\n";

cout << "Сумма элементов, которые больше среднего арифметического: " << s;

return 0;

}

A:

var

 s: string;

 i: integer;

begin

 Write('Введите строку: ');

 ReadLn(s);

 for i := 1 to length(s) do

 begin

   if s[i] = '.' then s[i] := '0' else

      if (s[i] = 'x') or (s[i] = 'X') then s[i] := '1' else

      begin

        s := 'Ошибка формата';

        break;

      end;

 end;

 WriteLn('Двоичный код: ', s);

end.

B:

var

 s: string;

 i: integer;

begin

 Write('Введите строку: ');

 ReadLn(s);

 for i := 1 to length(s) do

   if s[i] = '0' then s[i] := '1' else if s[i] = '1' then s[i] := '0';

 WriteLn('Инверсия: ', s);

end.

Объяснение: