ВС
Вячеслав Соловьев
Дано целое число N (>0). Найти сумму N^2+(N+1)^2+(N+2)^2+...+(2*N)^2
Найти сумму N^2+(N+1)^2+(N+2)^2+...+(2*N)^2
Помогите написать программу в Паскале!
Найти сумму N^2+(N+1)^2+(N+2)^2+...+(2*N)^2
Помогите написать программу в Паскале!
program sum;
var N:integer;
writeln("Vvedite N");
readln(N);
begin
{
for i:=1 to
VAR
i,s,N: integer;
BEGIN
readln(N);
s:=0;
for i := N to 2*n do s := s + i*i;
writeln(s);
readln;
END.