Advertisement
Guest User

Untitled

a guest
Apr 15th, 2019
128
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ada 0.32 KB | None | 0 0
  1. with Datos, Ada.Text_IO;
  2. use Datos, Ada.Text_IO;
  3. package IO is
  4.    procedure lecturaT(TR : out Temperatura); -- Sensores de temperatura ST1, ST2, ST3, ST4
  5.    procedure lecturaR(RD : out Radiacion); -- Radiacion SR1
  6.    procedure lecturaC(CD : out Caudal); -- Caudales SC1 y SC2
  7.    procedure escrituraC(CD : Caudal);
  8. end IO;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement