T integer. Program primer var a b integer. var a, b: integer;. begin end программирование. procedure a (b:integer);.