with Ada.Text_IO; use Ada.Text_IO;
procedure Hello is
begin
Put_Line ("Hello, world!");
end Hello;
with Ada.Text_IO; use Ada.Text_IO;
procedure Hello is
begin
Put_Line ("Hello, world!");
end Hello;
with Ada.Text_IO; use Ada.Text_IO;
procedure Show_Sum is
A, B, Sum : Integer;
begin
A := 10;
B := 20;
Sum := A + B;
Put_Line (Integer'Image(Sum));
end Show_Sum;
with Ada.Text_IO; use Ada.Text_IO;
procedure Reverse_Array is
type Array_Type is array (1 .. 5) of Integer;
Array1 : Array_Type := (1, 2, 3, 4, 5);
Array2 : Array_Type;
begin
Array2 := Array1(5 downto 1);
for I in Array2'Range loop
Put (Integer'Image(Array2(I)) & " ");
end loop;
end Reverse_Array;
with Ada.Text_IO; use Ada.Text_IO;
with Ada.Real_Time; use Ada.Real_Time;
procedure Delay_Example is
Time_Start : Time;
begin
Time_Start := Clock;
delay 1.0;
Put_Line (Duration'Image(Clock - Time_Start));
end Delay_Example;
Back-end App Developer
Front-end Web Developer
Full Stack Developer (Java)
Full Stack Developer (.Net)
Full Stack Developer (MEAN)
Full Stack Developer (MERN)
DevOps Engineer
Database Engineer (AzureSQL)
Database Engineer (Oracle)
Database Engineer (General)
Solution Architect (.NET)
Solution Architect (Java)
Solution Architect (Ruby)
Solution Architect (Python)
AI Engineer (Python)
Sr. AI Engineer (Python)
AI Strategist (Python)
Business Intelligence Engineer
Systems Analyst
Mainframe Developer (COBOL)
Mainframe Developer (General)