program int1;
var
      a:integer;
      b:byte;
      c:word;
      d:shortint;
      f:longint;
begin
        a:=1;
        b:=2;
        c:=3;
		d:=4;
		f:=5;

end.