Напишите порядок действий:
(здесь он неверный)​

#include <iostream>

#include <math.h>

using namespace std;

int main() {

setlocale(LC_ALL, "RUS"); //для русского языка в консоли

//условие задачи: посчитать цифры от 1 до 5, используя цикл for с параметром

int sum = 0;

for (int i = 1; i <=5; i++)

{

 sum = sum + i;

}

cout << "Сумма чисел от 1 до 5 равна: " << sum << endl;

}

Объяснение:

цикл с параметром for имеет вид: for (начальные_присваивания; выражение; приращение) оператор;

Сделал тебе на примере задачи, прописал в комментарии.

Uses
    System.Collections.Generic,
    System;

var
    simple: List<integer> := new List<integer>;
    i, n, p: integer;
    m: longint;

begin
    read(n);
    for i := 2 to n do
    begin
        m := 1;
        foreach s: integer in simple do
            m := m * i mod s;
        if m > 0 then begin
            simple.Add(i);
//            write(i, ' ');
        end;
    end;
    writeln();
   
    foreach s: integer in simple do
    begin
        if Math.Pow(2, s) - 1 <= longint.MaxValue then begin
            m := round(Math.Pow(2, s) - 1);
            if (m <= n) and simple.Contains(m) then
                write(m, ' ');
        end;
    end;
end.