Maira

program mai;
uses crt;
var nome:string;
Begin
   gotoxy(20,10);
   writeln('Programinha feito para alguém em especial');
   gotoxy(20,11);
   writeln('se você não é a pessoa, nunca vai saber o que tem por trás');
   gotoxy(20,12);
   writeln('deste programa. HAHAHAHA');
   gotoxy(20,13);
   writeln;
   gotoxy(20,14);
   writeln('Precione ENTER para continar o programa. ;-D');
   gotoxy(20,15);
   readln;
   clrscr;
   gotoxy(20,10);
   writeln('Entre com o seu nome');
   gotoxy(20,11);
   readln(nome);
   clrscr;

   if (nome = 'mai') or (nome = 'maira') then
      Begin
         gotoxy(20,10);
         writeln('Saiba que es uma das coisas mais importante da minha vida');
         gotoxy(20,11);
         writeln('infelizmente não temos mais o mesmo contato e etc, mas');
         gotoxy(20,12);
         writeln('saiba que você sempre vai está guardadinha nom eu coração.');
         gotoxy(20,13);
         writeln('Tudo bem, eu sei que tu está mô chatona comigo e tals, mas');
         gotoxy(20,14);
         writeln('você é o meu bolinho de arroz.');
         gotoxy(20,15);
         writeln('TE AMO MEU BOLINHO DE ARROZ <3');
         gotoxy(20,16);
         writeln; gotoxy(20,16);
         writeln;
         gotoxy(20,17);
         writeln('ENTER PARA SAIR');
         gotoxy(20,18);
         readln;
      end
   else if (nome = 'Mai') or (nome = 'Maira') then
         Begin
         gotoxy(20,10);
         writeln('Saiba que es uma das coisas mais importante da minha vida');
         gotoxy(20,11);
         writeln('infelizmente não temos mais o mesmo contato e etc, mas');
         gotoxy(20,12);
         writeln('saiba que você sempre vai está guardadinha nom eu coração.');
         gotoxy(20,13);
         writeln('Tudo bem, eu sei que tu está mô chatona comigo e tals, mas');
         gotoxy(20,14);
         writeln('você é o meu bolinho de arroz.');
         gotoxy(20,15);
         writeln('TE AMO MEU BOLINHO DE ARROZ <3');
         gotoxy(20,16);
         writeln;
         gotoxy(20,17);
         writeln('ENTER PARA SAIR');
         gotoxy(20,18);
         readln;
      end
   else if (nome = 'MAI') or (nome = 'MAIRA') then
         Begin
         gotoxy(20,10);
         writeln('Saiba que es uma das coisas mais importante da minha vida');
         gotoxy(20,11);
         writeln('infelizmente não temos mais o mesmo contato e etc, mas');
         gotoxy(20,12);
         writeln('saiba que você sempre vai está guardadinha nom eu coração.');
         gotoxy(20,13);
         writeln('Tudo bem, eu sei que tu está mô chatona comigo e tals, mas');
         gotoxy(20,14);
 writeln('você é o meu bolinho de arroz.');
         gotoxy(20,15);
         writeln('TE AMO MEU BOLINHO DE ARROZ <3');
         gotoxy(20,16);
         writeln;
         gotoxy(20,17);
         writeln('ENTER PARA SAIR');
         gotoxy(20,18);
         readln;
      end
  else
       gotoxy(20,10);
       writeln('Se você não se chama Maira/Mai, pega o beco COISA! :P');
End.