quarta-feira, agosto 26, 2015

LP - Comando de decisão IF , Else - Pascal

Program P_Decisao;
var   nome:string;
idade:integer;
 Begin
      write('Digite seu nome...: ');
      read(nome);
      write('Digite sua idade..: ');
      read(idade);

if (idade >= 18) then
      write('Entrada permitida para você ',nome)
   
Else
      write('Entrada negada para você ',nome);
 End.

Nenhum comentário:

Postar um comentário