!> This file was processed by `fypp`.
!> Today's fortune: "Sad CE", really OK?
!> ランダムウォーク猿「'貪欲' で はっぴー.」
!> ギャンブラー猿「流れが来てる...!」
program f902937
  use, intrinsic :: iso_fortran_env
  !> auto use module
  implicit none
  integer(16) :: n
  read(input_unit, *) n
  write(output_unit, '(i0)') n * (n + 1) / 2_16
end program f902937