תודה רבה לעוזרים
בשביל לגלות את הקוד אסקי של כל 1 מהחצים פשוט תבנה תוכנית שרושמת לך קוד אסקי של מקש שהוקש:writeln(ord(readkey));
writeln(ord(readkey));
-----------------בברכה,e-do
var a,b:char;begin a:=readkey; b:=readkey; if ord(a)=0 and ord(b)=80 then writeln('חץ למטה');end.
a:=readkey;if ord(a)=0 then b:=readkey;