Enzinholo

Obrigado cara me salvou 

20 minutos atrás, Simon Viegas disse:

uses CRT;

hum...gostei de aprender não sabia disso.

Percebi que os ends não estavam colocados no lugar certo, ajeitei o programa muito oobrigado cara.

Como não quero ter tanto trabalho não vou consertar a var, (talvez conserte)

Muito obrigadão tenho 14 anos, primeira linguagem, e ainda minha autodicta, nem faço curso ai tem vezes que n consigo fazer o programa funcionar, aprendendo para depois fazer uma facu ou um curso.

Galera estava fazendo uma explicação pro professor que e pra entregar na sexta dia 11/07, ele pediu pra gente fazer uma explicação do que era RPG.

Ai fiz um programinha no Pascal ai deu um erro alguém me ajuda?

Program  pesquisa;
    
     Var S, N, Pergunta: String;



Begin
  TextBackground (green) ;
  Textcolor (White) ;
  Writeln ('olá, meu amigo(a)') ;
  readln; 
  writeln ('Essa pesquisa foi feita por Enzo Felipe');
  readln;
  writeln ('Ele é um cara muito lindo e maravilhoso');
  readln;
  writeln ('voce sabe o que e "RPG" ?');
  readln;
  writeln ('Digite sua resposta (S)para sim ou (N)para nao:');
  Readln(Pergunta);
    If Pergunta = 'S' Then
    Begin
     Writeln('Que bom mas para explicar "RPG", a melhor definição seria um jogo em que os jogadores assumem papéis de personagens e criam narrativas colaborativamente.');  
         writeln('O progresso de um jogo se dá de acordo com um sistema de regras predeterminado, dentro das quais os jogadores podem improvisar livremente.');  
     Readln(S);
     writeln('Opa, voce quer saber o que significa a sigla "RPG"?');
     writeln('Digite sua resposta (S)para sim ou (N)para nao:');
     Readln(Pergunta);
      If Pergunta = 'S' Then
    Begin
     Writeln('Que bom você tem uma sede de conhecimento incrivel, e porque os primeiros "RPG" eram de dados ai ele ficou conhecido como Role-playing game'); 
         writeln('Que na sua tradução seria "jogo de rolamento" incrivel não é'); 
         writeln('Bom já que você chegou até o final, pode curtir nosso game'); 
         writeln('Bom, se tiver qualquer duvida entre em contato conosco (71)9.9853-5631');
     Readln(S);
    End;
      If Pergunta = 'N' Then
    Begin
     Writeln('Okay, qualquer duvida entre em contato conosco (71)9.9853-5631');
     Readln(N);
    End;
    If Pergunta = 'N' Then
    Begin
     Writeln('Okay, voce vai aprender agora, RPG e um jogo em que os jogadores assumem papéis de personagens e criam narrativas colaborativamente.');
     writeln(' O progresso de um jogo se dá de acordo com um sistema de regras predeterminado, dentro das quais os jogadores podem improvisar livremente.');
     writeln('Opa, voce quer saber o que significa a sigla "RPG"?');
     writeln('Digite sua resposta (S)para sim ou (N)para nao:');
     readln(N);
     Readln(Pergunta);
      If Pergunta = 'S' Then
    Begin
     Writeln('Que bom você tem uma sede de conhecimento incrivel, e porque os primeiros "RPG" eram de dados ai ele ficou conhecido como Role-playing game'); 
         writeln('Que na sua tradução seria "jogo de rolamento" incrivel não é'); 
         writeln('Bom já que você chegou até o final, pode curtir nosso game'); 
         writeln('Bom, se tiver qualquer duvida entre em contato conosco (71)9.9853-5631');
     Readln(S);
    End;
      If Pergunta = 'N' Then
    Begin
     Writeln('Okay, qualquer duvida entre em contato conosco (71)9.9853-5631');
     Readln(N);
    End;
    

 End.

Ai o erro foi esse.

Erro sintatico na linha 61

''.'' não esperado