How to String Starts With in Ada - Code Snippet

-- Task: String Starts With
-- Language: Ada

procedure string_starts_with() is begin
    -- Implementation for String Starts With
    -- TODO: Implement core logic here
    -- Step 1: Prepare data
    -- Step 2: Process String Starts With
    Put_Line("Done");
end;