From: Jerry <lanceboyle@qwest.net>
Subject: Re: Problem with output using Ada.Text_IO.Put
Date: Sat, 19 Jul 2014 15:10:15 -0700 (PDT)
Date: 2014-07-19T15:10:15-07:00 [thread overview]
Message-ID: <6db9cff0-a58a-4cc2-aee6-4bee1916be5a@googlegroups.com> (raw)
In-Reply-To: <6d5e2fff-e397-4c75-a3c9-3a7825d00752@googlegroups.com>
Works for me.
with Ada.Text_IO;
with Ada.Integer_Text_IO;
procedure textfromcla is
Nickels, Pennies : Integer;
begin
Ada.Text_IO.Put (Item => "How many nickels do you have? ");
Ada.Integer_Text_IO.Get (Item => Nickels);
Ada.Text_IO.Put (Item => "How many pennies do you have? ");
Ada.Integer_Text_IO.Get (Item => Pennies);
Ada.Text_IO.New_Line;
end textfromcla;
causes
How many nickels do you have? 3
How many pennies do you have? 5
Jerry
next prev parent reply other threads:[~2014-07-19 22:10 UTC|newest]
Thread overview: 9+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-07-19 21:37 Problem with output using Ada.Text_IO.Put junior learning ADA
2014-07-19 22:10 ` Jerry [this message]
2014-07-19 23:58 ` Jeffrey Carter
2014-07-20 5:22 ` Niklas Holsti
2014-07-20 6:52 ` junior learning ADA
2014-07-20 7:00 ` junior learning ADA
2014-07-20 14:51 ` Niklas Holsti
2014-07-20 8:53 ` Georg Bauhaus
2014-07-20 10:36 ` Simon Wright
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox