Ответы 1

  • Program n1;var n,i: integer;sum: real;begini:=0;sum:=0;readln(n);while i<=n dobeginsum:=sum+i*(i+1);i:=i+1;end;write(sum);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years