program cartao
    write(*,*)"****************************************************"
    write(*,*)"*Universidade Federal de Campina Grande            *"
    write(*,*)"*Curso de Ciencia &
               &da Computacao                    *"
    write(*,*)"*Antonio Costa e Silva                             *"
    write(*,*)"****************************************************"
    stop
end program cartao