.data
prompt1:    .asciiz "Introduza um numero\n"
char_to_print:  .asciiz "-"

.text
.globl main

main:
    # Print prompt1
    la $a0, prompt1
    li $v0, 4
    syscall

    # Read integer input
    li $v0, 5
    syscall
    move $t0, $v0  # Store input in $t0

    # Initialize i to 0
    li $t1, 0

loop:
    bge $t1, $t0, exit_program  # If i >= a, exit loop

    # Print character '-'
    la $a0, char_to_print
    li $v0, 4
    syscall

    addi $t1, $t1, 1  # i++

    j loop

exit_program:
    li $v0, 10  # Exit
    syscall