smartfish
-
Posts
1 -
Cadastrado em
-
Última visita
-
Pascal Erro que não percebo
smartfish respondeu ao tópico de Bernardo _Vasconcelos em Programação - outros
Cara, você esqueceu de fechar as aspas em dois write's, e outra, ali no while tem de ser assim: while (r='S') or (r='s') do Sempre que tu for se referir à algo escrito, ponha aspas... Testei esse no meu e foi sem erro, dps da uma olhada. Program aprovacaoalunos ; var n, m: real; r: char; Begin writeln('Qual a primeira nota do(a) aluno(a)'); read(n); m:=n; writeln('Qual a segunda nota do(a) aluno(a)'); read(n); m:=(m+n)/2; writeln('Calcular a média de outro aluno Sim Não?'); readln(r); while (r='S') or (r='s') do begin writeln('Qual a primeira nota do(a) aluno(a)'); read(n); m:=n; writeln('Qual a segunda nota do(a) aluno(a)'); read(n); m:=(m+n)/2; writeln('Calcular a média de outro aluno Sim Não?'); read(r); end End.
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades 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