<span>После max ты поставил ":" (max:a; max:c;) а надо ":=" (max:=a; max:=c;)</span>
Схема в приложенной картинке.
Var A,B,i : Integer;
Begin
Readln(A,B);
For i:=A to B do Writeln(Sqr(i));
end.
#include <iostream>
#include <clocale>
#include <cmath>
using namespace std;
void main()
{
setlocale(LC_CTYPE,"rus");
int x, sum=0;
cout<<"Введите переменную: ";
cin>>x;
for(int i=1; i<x;i++)
{
if(x%i==0)
sum+=i;
}
if(x==sum)
{cout<<"Это совершенное число"<<endl;}
else
{cout<<"Это несовершенное число"<<endl;}
<span>}</span>