23 lines
510 B
Ada
23 lines
510 B
Ada
with ComplexCalculator;
|
|
with Ada.Text_IO;
|
|
|
|
procedure main is
|
|
FirstInput : String(1..100);
|
|
SecondInput : String(1.100);
|
|
|
|
begin
|
|
|
|
-- Your program logic goes here
|
|
Ada.Text_IO.Put("Specify first imaginary number: ");
|
|
|
|
-- Read the user's input and store it in the UserInput variable.
|
|
Ada.Text_IO.Get_Line(UserInput);
|
|
|
|
-- Display the user's input.
|
|
Ada.Text_IO.Put_Line("You entered: " & UserInput);
|
|
|
|
|
|
-- Example: Display a message
|
|
Ada.Text_IO.Put_Line("Hello, Ada!");
|
|
end main;
|