• Решите циклом ДЛЯ или циклом ПОКА.
    1) Вычислить значение выражения z = 1 + 2+ 3+...+M. Распечатать квадрат и куб значений выражения.

Ответы 1

  • var sum,i,m:integer;begin sum:=0; read(m); for i:=1 to m do  sum:=sum+i; writeln(sum);end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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