Одно целое число значение переменной а

{Pascal}
var
a:integer;
begin
write('Введите a: ');
readln(a);
writeln('Вы ввели ',a);
end.

Я восхищена Вами, а я даже вопроса не поняла (((