Reply to CS508 Assignment 2 Solution and Discussion on Thu, 05 Dec 2019 08:33:57 GMT

zareen — Thu, 05 Dec 2019 08:33:57 GMT

Fall 2019_CS508_2_SOL-1.rar

Reply to CS508 Assignment 2 Solution and Discussion on Mon, 02 Dec 2019 15:09:06 GMT

cyberian — Mon, 02 Dec 2019 15:09:06 GMT

with Ada.Text_IO; use Ada.Text_IO;


procedure Main is
 Input, Output : File_Type;
begin
   Open (File => Input,
         Mode => In_File,
         Name => "input.txt");
   Create (File => Output,
           Mode => Out_File,
           Name => "output.txt");
   loop
      declare
         Line : String := Get_Line (Input);
      begin
         -- You can process the contents of Line here.
         Put_Line (Output, Line);
         Put_Line (Line);

      end;
   end loop;
   Close (Input);
   Close (Output);
exception
   when End_Error =>
      if Is_Open(Input) then
         Close (Input);
      end if;
      if Is_Open(Output) then
         Close (Output);
      end if;
end Main;

Reply to CS508 Assignment 2 Solution and Discussion on Mon, 25 Nov 2019 14:01:29 GMT

zareen — Mon, 25 Nov 2019 14:01:29 GMT

https://youtu.be/Y3NIBdqUCOI