Реляционная база данных-это совокупность взаимосвязанных таблиц каждая из которых содержит информацию об объектах определённого типа.
Var
a: Real;
i,n: Integer;
Begin
WriteLn('Введите ваше ЭН'); ReadLn(n);
a:=0;
<span>for i:=1 to n do
a:= a + sqr(i);
</span>end;
WriteLn('Сумма квадратов равна=',a);
ReadLn;
end.