1
« en: Domingo 3 de Septiembre de 2017, 22:22 »
Alguien que pueda ayudarme? me marca errores (13,6) Fatal: syntax error, "." expected but ";" found
Program Suma_resta_multiplicacion_divicion;
uses crt;
var
x: Integer;
begin
clrscr;
write('Preciona EZ para sumar, P2 para restar, C3 para multiplicar o V4 si decea dividir');
if X=EZ then
write('Dame dos numeros:')
read (C4,F5)
O3:=(C4+F5)
read (O3)
write ('El resultado es:',O3)
end;
else
if X=P2 then
write ('Dame dos numeros')
read (Y3,Q9)
W1:=(Y3-Q9)
write ('El resultado es:',W1)
end;
else
if X=C3 then
write ('Dame dos numeros')
read(M5,B2)
L6:=(M5*B2)
write ('El resultado es:',L6)
end;
else
if X=V4 then
write ('Damedos numeros')
read(U4,K3)
L12:=(U4/K3)
write ('El resultado es:',L12)
end.