Найти сумму натуральных трехзначных чисел, каждое из которых при делении на 7 дает в остатке 3. (с использованием цикла, на языке pascal)

Uses crt;
var number:integer;
begin       
         number := 0;          
         for var i := 100 to 999 do         
         if(i mod 7 = 3) then             
              number := number + i;         
         writeln('Сумма: ', number);
end.

#include <iostream>

#include <ctime>

#include <algorithm>

signed main() {

 

setlocale(LC_ALL, "Rus");

srand(time(NULL));

 

int n;

std::cout << "Размер массива: ";

std::cin >> n;

int* arr = new int[n];

std::cout << "Исходный массив: ";

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

 arr[i] = rand() % 10;

 std::cout << arr[i] << " ";

}

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

 for (int j = 0; j < n-1; j++) {

  if (arr[j] > arr[j + 1])

   std::swap(arr[j], arr[j + 1]);

 }

}

std::cout << std::endl << arr[n - 1] + arr[n - 2];

return 0;

}

#include <iostream>

#include <string>

#define SIZE 3

/*

Структура содержит 3 поля, фамилия и оценки имеют тип string, поле с годом рождения имеет тип int;

Также имеется метод, с которого происходит ввод информации.

*/

struct student {

std::string surname;

int birthYear;

std::string marks;

void InputInfo() {

 std::cout << "Фамилия студента: ";

 getline(std::cin, surname);

 std::cout << "\nГод рождения студента: ";

 std::cin >> birthYear;

 std::cin.ignore();

 std::cout << "\nОценки студента: (через пробел): ";

 getline(std::cin, marks);

}

};

/*

В основной функции мы создаем массив структур "group" размера SIZE (SIZE объявили выше)

Затем находим сумму возрастов и делим ее на размер массива структур

*/

signed main() {

setlocale(LC_ALL, "Rus");

student group[SIZE];

int _sumAge = 0;

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

 group[i].InputInfo();

 _sumAge += 2022 - group[i].birthYear;

}

std::cout << "\nСредний возраст студентов в группе:" << _sumAge / SIZE;

return 0;

}