Allora sto facendo questo programma in TP
---------------
program numero;
uses crt;
var n,l,s:integer;
begin
clrscr;
writeln('Inserisci il numero');
readln(n);
if (n/1=n) then
begin
writeln('inserisci il secondo numero da sommare');
readln(l);
if (l/1=l) then
begin
s:=l+n;
writeln('la somma Š ',s);
readln;
end
else
begin
clrscr;
writeln('Inserisci il numero, prima non lo hai inserito o era un carattere non numerico');
readln(n);
end;
end;
end.
--------
Vorrei fare in modo che se il carattere inserito da tastiera non è un numero ma una lettera ad esempio scriva a video il messaggio che il tasto premuto era una lettera. Vorrei sapere inoltre come verificare se il tasto premuto è ESC. In delphi lo so fare in TP sinceramente non so che comandi usare.
Mi aiutate voi
Grazie
CIao