until expected but identifier found
Publicado por Martin3001 (6 intervenciones) el 06/05/2020 04:26:41
Hola a todos
Saben porque salta este error ''until expected but identifier found''
Este es el algoritmo que estoy haciendo
Saben porque salta este error ''until expected but identifier found''
Este es el algoritmo que estoy haciendo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
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'
Valora esta pregunta


0