[ Foro de Pascal ]

until expected but identifier found

06-May-2020 04:24
Martn 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 (+55)

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...






Si ya eres usuario del sistema, puedes contestar desde tu cuenta y así ganar prestigio.

Si sólo eres un visitante, puedes optar por...