begin
end
if
then
else
procedure
function
with
while
repeat
until
for
do
and
or
not
read
readln
write
writeln
program
unit
uses
type
var
const