1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

--> [pascal] Programa <--

Discussão em 'Programação' iniciada por jordemen, 23 de Maio de 2008. (Respostas: 5; Visualizações: 697)

  1. Pessoal, gostaria k me arranjassem o código de um programa em pascal, para de uma palavra fazer o seguinte: EX (palavra TURBO) :
    TURBO
    TO
    TUBO
    TURRBO
    TURBURBO
    TURBOTURBO

    E que tenho de fazer este trabalho mas nao percebo nada de pascal... se me poderem ajudar agradecia...desde ja obrigado a todos...
    abraços, jordemen
     
  2. O melhor vai ser dizer em que é que tens dúvidas, que aqui ninguém te vai fazer o trabalho.
     
  3. eu ja fiz, mas aparece do tipo:
    TO
    UB
    RR
    BU
    OT
    e nao é bem isto k eu kero, ou seja, falta-me o resto das letra e nao sei komu fazer...
     
  4. andrepadez

    andrepadez Power Member

    Desculpa mas não consigo perceber qual a correlação entre as palavras pretendidas. Sem isso é dificil construir um algoritmo.

    Já agora, posta o código que já fizeste
     
  5. código ja feito

    Aki vai o código k ja fiz, como pedido:

    Código:
    uses crt;
    var Pal: string;
        Idx, Aux, Udx, Abc, Zzz :integer;
    Begin
         clrscr;
         writeln ('Introduza uma palavra');
         readln(Pal);
         Aux:=1;
         Udx:=length(Pal);
         For Idx:=Aux to length(Pal) do Begin
             write (Pal[Idx]);
             writeln(Pal[Udx]);
         end;
         readln;
    end.
     
    Última edição pelo moderador: 26 de Maio de 2008
  6. Mach4_PT

    Mach4_PT Power Member

    A relação é:
    1ª e ultima letra
    1ª, 2ª e penultima e ultima letra
    1ª, 2ª, 3ª - Antepenultima, penultima, ultima...

    etc até chegares ao fim da palavra...

    Sobre o programa: Não sei se dá para fazer em pascal visto nc ter olhado para isso mas tenta por as letras da palavra num array... depois é facil :P
     

Partilhar esta Página