Contact: aviboots(AT)netvision.net.il
43,903 questions
57,300 answers
573 users
with Ada.Text_IO; use Ada.Text_IO; with Ada.Integer_Text_IO; use Ada.Integer_Text_IO; procedure ada_pro is X: Integer := 5; Y: Integer := 6; Z: Integer := X + Y; begin Put("X + Y = "); Put(Z); end ada_pro; -- run: -- X + Y = 11