Resolução da Primeira Série de Problemas

ISCTE, IGE, PROGRAMAÇÃO I, 1997/98

Primeira Série de Problemas - 23 de Outubro de 1997

[10,0] Problema 1

{Pressupostos: A dimensão do cateto dada pelo utilizador é
               não negativa. }

{Resultado: Aparece no ecrã um triângulo rectângulo isósceles de
            asteriscos com hipotenusa voltada para a esquerda e
            para baixo e dimensão do cateto dada pelo utilizador. }

triânguloInvertido
início
    inteiro cateto, númeroDeAsteriscos;

    escrever "Qual a dimensão do cateto? ";
    ler para cateto;

    númeroDeAsteriscos <- cateto;
    repetir cateto vezes:

        (* Escrever espaços iniciais: *)
        repetir cateto - númeroDeAsteriscos vezes:
            escrever " ";
        fim repetir;

        (* Escrever asteriscos: *)
        repetir númeroDeAsteriscos vezes:
            escrever "*";
        fim repetir;

        escrever linha;

    fim repetir;

fim.

[10,0] Problema 2

{Pressupostos: Nenhum. }

{Resultado: Aparece no ecrã a tabuada indicada pelo utilizador. }

tabuada
início
    inteiro multiplicador, multiplicando;

    escrever "Que tabuada quer? ";
    ler para multiplicando;

    multiplicador <- 1;
    repetir 10 vezes:
        escrever multiplicando, " x ", multiplicador, " = ",
                 multiplicando * multiplicador, linha;
        multiplicador <- multiplicador + 1;
    fim repetir;

fim.