Задача №6. Дано натуральное число N. Написать для вычисления суммы 1^2+2^2+3^2+...+n^2 программу входные данные n=3 выходные данные 14
Var n,k,b : real;beginread (n);k:=0;b:=0;while n>0 do beginb:=(b+1)*(b+1);k:=k+b;n:=n-1;b:=sqrt(b);end;write (k);end. Если на сайт, просто скопируй в паскаль
хотя, придется разбить на строчки, но это уже сам