clc;
clear;
disp('Zad. 15')
disp('Program liczy: 1^2 + 2^2 + 3^2 + ... + n^2 , założenie: n jest liczbą naturalną')
n=input('Podaj wartość n: ');
while n<0 || n~=round(n)
n=input('Zła wartość liczby. Podaj ponownie: ');
end
wynik=0;
for a=1:n;
wynik=wynik+(a^2);
end
disp(['Wynik = ',num2str(wynik)])