pascal - тип Integer

program max_types;

var
  si: shortint;
   i: integer;
  li: longint;

begin
  si := 127;
   i := 2147483647;
  li := 2147483647; 
  
  writeln('short int max = ', si);
  writeln('short int max+1 = ', si+1);
  si := si+1;
  writeln('short int max+1 (si) = ', si+1);
  
  writeln('integer max = ', i);
  writeln('integer max+1 = ', i+1);

  writeln('long int max = ', li);
  writeln('long int max+1 = ', li+1);  
  
end.
Праздники России

Рейтинг