*_*

sábado, 26 de novembro de 2011

Exercício 01 Estrutura de Seleção 2 - Pascal


1) Faça um programa que receba 2 números e mostre o menor.


Program cond01 ;
var
 num1,num2: integer;
 Begin
  Write('Informe 1 Num: ');
  readln(num1);
  Write('Informe 2 Num: ');
  readln(num2);
   if num1 > num2 then
     Writeln('Menor: ',num2)
   else Writeln('Menor: ',num1);
     
 End.

Categories: ,

0 comentários:

Postar um comentário