Fiz esse algoritmo mas ele não executo, aparece um erro, "else não esperado":
Program valormaior_oumenor ;
var
valornicial, valorfinal:integer;
Begin
writeln('Digite um valor ');
read(valorinicial);
writeln('Digite outro valor ');
read(valorfinal);
if (valorinicial>valorfinal) then
while (valorinicial>=valorfinal) do
writeln('valorinicial')
valorinicial:=valorinicial+1
else
while (valorinicial<=valorfinnal) do
writeln(valorfinal)
valorfinal:=valorinicial-1
End.
being
,end
ou simplesmente um;
?