Descrição
Este script nos diz o maior e o menor, entre 3 números digitados.
[ Download:
MAIOR.PAS ]
[
Enviar nova versão ]
[ 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
media/record
Calculadora Básica
controle de notas de um aluno com registro e array
Números perfeitos
escreve os números de 1 a 9 com repeat - until
Comentários
| Nenhum comentário foi encontrado. |
Indicar para um amigo
Escrever um script