package main

import (
    "fmt"
    "os"
    "strconv"
    "strings"
)

func main() {
    coinValue := [4]int{25, 10, 5, 1}
    coins := [4]int{0, 0, 0, 0}

    var amount string

    r := strings.NewReplacer("$", "", ".", "")

    fmt.Scanf("%s", &amount)

    result := r.Replace(amount)

    convAmount, err := strconv.Atoi(result)

    if err != nil {
        fmt.Println(err)
        os.Exit(1)
    }

    for i := 0; i < len(coinValue); i++ {
        num := convAmount / coinValue[i]
        coins[i] = num
        convAmount = convAmount % coinValue[i]
    }

    fmt.Println(coins[0], "Quarter(s),", coins[1], "Dime(s),", coins[2], "Nickel(s),", coins[3], "Penn(y/ies)")

}