Arquivo Discussoes de Programacao e Tecnologia O que tem de errado neste codigo? Não consigo encontrar o erro. Alguém pode me ajudar?
program Raiz
var n, r, s, i integer;
begin
read n;
i := 1;
r := 0;
s := 0
while (s < n)
begin
s := s + i;
i := i + 2;
r := r + 1
end;
if n = s then
writeln('A raiz de ', n, ’ é ', r);
else
writeln('A raiz de ', n, ’ está entre ', r-1, ’ e ', r)
end;
Qual a mensagem de erro? Que resultado você esperava obter ao executar esse código?
Estão faltando alguns ponto e vírgula. Isso foi proposital?
Abraço.
Além dos ponto e vírgula faltantes, percebi que talvez falte uma conversão de int para String no writeln.
ola, por ser uma estrutura de laços enquanto o resultado da expressão resultar em verdadeira, acredito que a sintaxe correta seja:
Program Raiz;
var
n,r,s,i: integer;
Begin
read (n);
i:=1;
r:=0;
s:=0;
while (s<n) do
Begin
s:=s+i;
i:=i+2;
r:=r+1
end;
if n =s then
writeln (‘a raiz de’, n, ‘é’, r)
else
writeln(‘a raiz de’,n,‘esta entre’,r-1, ‘e’, r)
End.
Obrigado deu certo!