Pascal/Estrutura de repetição: diferenças entre revisões

[revisão pendente][revisão pendente]
Conteúdo apagado Conteúdo adicionado
m Foram revertidas as edições de 179.127.33.60 (disc) para a última revisão de DARIO SEVERI
Etiqueta: Reversão
 
Linha 242:
* Critique as variáveis onde for necessário
 
Resolução:
<syntaxhighlight lang="pascal">
program alturamf;
Linha 267:
begin
writeln('Qual o sexo da ',cont,'o pessoa?<m> masculino ou <f> feminino');
readln(sexo); //eita bicho sexokkkk
while (sexo<>'m') and (sexo<>'f') do
begin