Guest User

Untitled

a guest
Jan 25th, 2018
101
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ada 0.47 KB | None | 0 0
  1.             Open(File => InputFile, Mode => Ada.Text_IO.In_File, Name => argument(i+1));
  2.             if a = false then Ada.Integer_Text_IO.Get(File => InputFile, Item => numberOfProducents);end if;   
  3.             if b = false then Ada.Integer_Text_IO.Get(File => InputFile, Item => numberOfClients);end if;  
  4.             if c = false then Ada.Integer_Text_IO.Get(File => InputFile, Item => numberOfProducts);end if
  5.             if d = false then Ada.Integer_Text_IO.Get(File => InputFile, Item => limitOfProducts);end if;
Add Comment
Please, Sign In to add comment