String comparison: Difference between revisions

Content added Content deleted
Line 37:
begin
Ada.Text_IO.Put_Line
("""" & A & """ and """ & B & """: " &
(if A = B then
"equal, "
Retrieved from "https://rosettacode.org/wiki/String_comparison"