BHAMF Posted May 31, 2018 at 04:22 PM Report #610803 Posted May 31, 2018 at 04:22 PM Sempre me perguntei: Como receber o valor que eu quero independente da "posição em que as letras estejam"... Ex: [...] //em vez de fazer isto: case A of 'Sim' : Initial; 'sIM' : Initial; 'SIM' : Initial; 'sim' : Initial; 'sIm' : Initial; [...] end; //Como faço, pra indepentende da "posição das letras", eu receber o mesmo valor? Espero respostas 🙂 obrigado desde já! B.H.A.M.F, 31/05/2018 | 13:22 (Horário de Brasília) Brenio Hallison A.M. Filho
passarito Posted June 4, 2018 at 09:26 PM Report #610862 Posted June 4, 2018 at 09:26 PM (edited) Boas. Conforme leias a variável A conforme a resposta. Se leres com readln(A); então a opção será For i:=1 to length(A) do A[i]:=upcase(A[i]) if A = 'SIM' then begin ... else ... end; Também já li em qualquer lado que pode ser algo do género A:=upcase(A); mas não tenho a certeza que isso funcione com strings, sempre usei o upcase com caracteres. Por outro lado se leres a variável A caracter a caracter então terás de elevar o caracter quando o leres A:=''; Repeat ch:=upcase(readkey); A:=A+ch; until ch=#13 Edited June 5, 2018 at 03:00 PM by passarito Correcção ortográfica 1 Report
thoga31 Posted July 7, 2018 at 08:05 PM Report #611251 Posted July 7, 2018 at 08:05 PM Em 04/06/2018 às 22:26, passarito disse: For i:=1 to length(A) do A[i]:=upcase(A[i]) Também já li em qualquer lado que pode ser algo do género A:=upcase(A); mas não tenho a certeza que isso funcione com strings, sempre usei o upcase com caracteres. @passarito, estamos em 2018, não em 1978 😂 A função upcase pode ser usada com caracteres e strings. readln(linha); linha := UpCase(linha); if linha = 'SIM' then begin // doçura de código end; 2 Report Knowledge is free!
passarito Posted July 9, 2018 at 02:28 PM Report #611267 Posted July 9, 2018 at 02:28 PM Em 07/07/2018 às 21:05, thoga31 disse: @passarito, estamos em 2018, não em 1978 😂 Há gajos que só aparecem para me f.#$%.er a cabeça. Queres ver que levas com a bengala!😆
BHAMF Posted July 17, 2018 at 02:12 PM Author Report #611362 Posted July 17, 2018 at 02:12 PM Obrigado @passarito e @thoga31! Ajudaram muito :D_ B.H.A.M.F. 17/07/2018 | 11:12 (Horário de Brasília) Brenio Hallison A.M. Filho
nunopicado Posted August 9, 2018 at 09:18 AM Report #611562 Posted August 9, 2018 at 09:18 AM Eish, ainda levam os dois com a bengala... 😄 É 2018, não 1956! Poupem nos comandos, p.f. 😁 readln(linha); if UpCase(linha) = 'SIM' then begin // doçura de código end; 2 Report "A humanidade está a perder os seus génios... Aristóteles morreu, Newton já lá está, Einstein finou-se, e eu hoje não me estou a sentir bem!" > Não esclareço dúvidas por PM: Indica a tua dúvida no quadro correcto do forum.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now