[ Foro de Pascal ]

until expected but identifier found

06-May-2020 04:24
Martín Coronel
1 Respuestas

Hola a todos
Me pueden decir porque me salta este error 'until expected but identifier found'
program punto10;
var
 temperatura, contador1, contador2, temp, contador: integer;
 promedio, promparcial: real;
 respuesta: char;

begin
 contador1 := 0;
 contador2 := 0;
 temp := 0;
 promedio := 0;
 contador := 0;
 repeat
   writeln ('ingrese la temperatura de una caldera}: ');
   readln (temperatura);
   if (temperatura >= 25) and (temperatura >=100) then
      begin
        temp := temp + temperatura;
        contador1 := contador1 + 1;
        promparcial := temp / contador1;
      end
   else
      begin
        writeln ('se encuentra fuera del rango permitido');
        contador2 := contador2 + 1;
      end
   writeln ('Desea ingresar mas datos: S/N');
   readln (respuesta);
 until (respuesta = 'n');
 promedio := promparcial;
 contador := contador2;
 writeln ('El promedio total de temperatura es : ', promedio);
 writeln ('La cantidad de temperaturas fuera de rango: ', contador);
 readln;
end'        


06-May-2020 05:45
Nacho Cabanes (+84)

No lo puedo probar ahora ¿En qué número de línea te da el error? Por ejemplo, te falta un punto y coma en el end de else (y la lógica del if parece incorrecta). También está mal el último end...






(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)