Ответы 1

  • begin write('Введите целое число n (n > 1): '); var n := ReadInteger; var a := 1; var b := 1; write(1, ' ', 1, ' '); for var i := 3 to n do begin var c := a + b; write(c, ' '); a := b; b := c; end;end.
    • Автор:

      penny68
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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