Ir ao conteúdo
  • Cadastre-se

SKYLPHES

Membros Juniores
  • Total de itens

    2
  • Registro em

  • Última visita

  • Qualificações

    N/D
  1. program media; uses crt; var n1 , n2 ,n3 , np , mp , nf, p, f, c,pf : real; nome , materia :string ; begin clrscr; writeln (' digite seu nome e tecle enter para prosseguir '); readln (nome); writeln (' ola ', nome , ' digite sua materia e tecle enter para prosseguir '); readln (materia); writeln (nome, ' digite sua cargoraria ' ); readln (c); writeln (nome, ' digete quantas faltas voce tem ' ); readln (f); p:= (f / c )*100 ; if p<=25 then begin writeln(nome, ' voce esta apto a seguir com o programa '); readkey; end; if p>25 then begin textcolor (red); writeln(nome, ' voce esta reprovado por faltas '); readkey; end; begin textcolor(lightblue); writeln (nome,' digite seu n1 e tecle enter para prosseguir '); readln (n1); Eu fiz assim e deu certo so que quando ele ja esta reprovado por falta nao e pra continuar so que esta indo pra esse writeln ( digite seu n1 ) como faço pra finalizar se o aluno ja estiver reprovado por falta. e desde ja agrade a compreensao de todos que ja me ajudaram
  2. BOA NOITE!! Sou meio lego no assunto e gostaria de pedir ajudar pois curso engenharia civil e tenho um trabalho pra fazer com o pascal ja fiz uma parte mais a outra nao estou conseguindo que seria o aluno tem a cargoraria de 60 horas que daria 25 dias de aula o aluno que atingir 25 % de falta esta reprovado como faria isso no pascal se aluem poder me ajudar como disse sou meio ou todo lego no assunto rsrs e obrigado desde já .

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×