Maior e menor

Publicado por Leonardo 28/05/2007

[ Hits: 3.765 ]

Download MAIOR.PAS




Este script nos diz o maior e o menor, entre 3 números digitados.

  



Esconder código-fonte

program maior_e_menor;

var
a,b,c :integer;

begin
   writeln('Digite 3 numeros, A, B e C');
   readln(a);
   readln(b);
   readln(c);
    if (a < b) and (a < c) then
    writeln ('O menor numero eh o ',a)
    else
    if b<c then
    writeln('o menor numero eh o ',b)
    else
    writeln('O menor numero eh o ',c);

    if (a>b) and (b>c) then
    writeln('O maior numero eh o ',a)
    else
    if b>c then
    writeln ('O maior numero eh o ',b)
    else
    writeln('O maior numero eh o ',c);
end.


Scripts recomendados

jogo bobo testando com case

Matriz simétrica

usando vetor e procedimentos

controle de notas de um aluno com registro e array

maior elemento de uma matriz


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts