Ir para conteúdo
Fórum Script Brasil
  • 0

Algoritimo inverter numeros


rafaelvitti

Pergunta

6 respostass a esta questão

Posts Recomendados

  • 0
Preciso desenvolver um algoritmo que leia um numero de 3 digitos do usuario

e faça a inversão

ex: de 123 para 321

alguém tem alguma ideia de como posso fazer isso sem usar vetor e matriz?????

Em pascal ficaria assim :

program Project2;
{$APPTYPE CONSOLE}
uses SysUtils;
var i,n, numero : integer; s, inverso : string;
begin
  writeln('Digite um numero');
  readln(numero);
  n := length(inttostr(numero));
  s := inttostr(numero);
  for i := 1 to n+1 do
     begin
        inverso :=  inverso + s[n];
        n := n - 1;
     end;
  writeln('O numero inverso = '+inverso);
  readln;
end.

abraço

Link para o comentário
Compartilhar em outros sites

  • 0
Só fazer um vetor de 3 linas, faça uma estrutura d looping até 3 para o usuário digitar, e outro looping de de saída até três...

Acho que assim te ajuda..

program inversao;
   uses wincrt;
    const lim=20;
    var n,i:integer;
      seq: array [1..lim] of integer;
  begin
    read(n);
    if n<=lim
    then
      for i:=1 to n do read(seq[i]);
      for i:=n downto 1 do write(seq[i]:3);
      writeln
    end;
  end.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...