Найти сумму 4+9+...+m^2, лишь из слагаемых, меньших k.
uses crt;var m,p,i:integer;beginwrite(M = );read(m);p:=1;for i:=1 to m dobeginp:=p*(2*i+1);end;write(p = ,p);end.
Оцени ответ
Вход
Регистрация
Задать вопрос
uses crt;var m,p,i:integer;beginwrite(M = );read(m);p:=1;for i:=1 to m dobeginp:=p*(2*i+1);end;write(p = ,p);end.