VisualG Como reconhecer se uma tecla está sendo pressionada ?

[laessandor]

Gostaria de adicionar uma função (não sei se é assim que chama), na minha calculadora que estou fazendo no visualg.

Queria que quando o usuário apertasse uma tecla algo acontecesse.

 

por exemplo: SE uma tecla foi pressionada ENTAO

                             X = 3

 

[devair1010]

@laessandor    no visualG não se pode fazer isso , pois esse compilador é bem simples , e usado apenas por iniciantes e assim ele tem poucos recursos ,  ele tem apenas uma função de entrada de dados , que é "leia"  ,  e  o funcionamento dela é esperar até que a tecla enter seja pressionada ,  diferente de outras linguagens , como em c , que tem essa função kbhit(); , que detecta o pressionamento de qualquer tecla .

[laessandor]

Poxa que pena. Muito obrigado pela sua resposta, pode ter certeza que vou abrir um novo tópico quando tiver dúvidas kkkkk

 

[Simon Viegas]

22 horas atrás, laessandor disse:

Poxa que pena. Muito obrigado pela sua resposta, pode ter certeza que vou abrir um novo tópico quando tiver dúvidas kkkkk

 

O VisualG meio que seria "uma Pascal em Português"...

Lá no Pascal poderia utilizar o ReadKey(). No VisualG não existe (desconheço) função similar. Exemplo no Pascal:
 

program TesteReadkey;
{$CODEPAGE UTF8} //para permitir acentos nas string em alguns compiladores [Não necessário no PascalZim, mas pode deixar]
uses
  CRT; //carrega comandos extras como o ReadKey() [Não necessário no PascalZim, mas pode deixar]
var
  tecla : char;
  numero : integer;
begin
tecla := ' ';
while (tecla <> #13) do //enquanto diferente de ENTER
  begin
  tecla := ReadKey();
  
  if (tecla in ['0'..'9', '+', '-', '*', '/']) then
    writeln(tecla);
  end;
end.

Testando... só exibe o que estiver na faixa:

 

Aí no caso, só converter antes a tecla numéricas para inteiro e fazer o que quiser...

Adendo: observe que basicamente o Pascal seria um VisualG em inglês.. só que mais robusto, rs.