How to resolve the algorithm Terminal control/Inverse video step by step in the Ada programming language

Published on 12 May 2024 09:40 PM
#Ada

How to resolve the algorithm Terminal control/Inverse video step by step in the Ada programming language

Table of Contents

Problem Statement

Display a word in inverse video   (or reverse video)   followed by a word in normal video.

Let's start with the solution:

Step by Step solution about How to resolve the algorithm Terminal control/Inverse video step by step in the Ada programming language

Source code in the ada programming language

with Ada.Text_IO; use  Ada.Text_IO;

procedure Reverse_Video is 

   Rev_Video  : String := Ascii.ESC & "[7m";
   Norm_Video : String := Ascii.ESC & "[m";

begin
   Put (Rev_Video & "Reversed");
   Put (Norm_Video & " Normal");
end Reverse_Video;

You may also check:How to resolve the algorithm Perfect numbers step by step in the COBOL programming language
You may also check:How to resolve the algorithm HTTP step by step in the PHP programming language
You may also check:How to resolve the algorithm Sierpinski arrowhead curve step by step in the Mathematica / Wolfram Language programming language
You may also check:How to resolve the algorithm Sierpinski triangle/Graphical step by step in the Sidef programming language
You may also check:How to resolve the algorithm Fractal tree step by step in the Ada programming language