{ Idade Cinema }
program semnome;
uses Crt;
{ Função :}
{ Autor :}
{ Data : 10/09/2011}
{ Seção de Declarações}
var
Idade : real;
nome: string;
{ Seção de Comandos}
begin
   writeln ('digite seu nome');
   readln (nome);
   writeln ('escreva sua idade');
   readln (idade);

   if (idade >= 0) and ( idade <= 10) then begin
      writeln ('paga 5 reais');
   end;
   if ( idade >= 11) and ( idade <= 20 ) then begin
      writeln ('paga 10 reais');
   end else begin
      writeln ('paga 15 reais');
   end;




end.