Ανάγνωση απο το πληκτρολόγιο

Χρησιμοποιήστε read (ο κέρσορας μένει στην ίδια γραμμή) , readln (ο κέρσορας πηγαίνει στην επόμενη γραμμή).
eg.
program a2;
var
a:integer;
begin
readln(a);
writeln(a);
end.