Question: Go to http://ideone.com/ 1) Run the following Ada sample code 2) refer to this sample code red in ADA code that reads 10 integers from
With Ada. Text_IO; Use Ada. Text IO; with Ada.Integer Text to; Use Ada. Integer Text To; procedure Arri is A: array(1..5) of Integer; Array subscripts 1 to 5. I: Integer sum: integer; begin sum :=0; - Read 'em in. for I in 1..5 1oop Put(" "): Get(A(I)) end loop -Put 'em out in reverse order. Put(") for I in reverse A'Range loop Put (A(I)) sum sum A(I) if I > A'First then Put end if ; end loop Put_Line(") Put( sum ))i end Arrl
Step by Step Solution
There are 3 Steps involved in it
Get step-by-step solutions from verified subject matter experts
