Home

Ada Keywords: constant

   

Example

with Ada.Text_IO;
use Ada.Text_IO;

procedure Exercise is
   number : constant integer := 2248;

begin
   Put_Line("Number = " & integer'image(number));
end Exercise;

This would produce:

Number =  2248
   

 

 
 
 
 
 
   
 

Home Copyright © 2010 FunctionX, Inc.