1. Натуральное число M называется совершенным, если оно равно сумме всех своих делителей, включая единицу, но исключая себя. Напечатать все совершенные числа, меньшие заданного числа N.Примечание: Решить в Pascalе.

#include
#include
#include
using namespace std;

void main()
{
setlocale(LC_CTYPE,"rus");
int x, sum=0;
coutcin>>x;
for(int i=1; i{
if(x%i==0)
sum+=i;
}
if(x==sum)
{coutelse
{cout}