XỬ DỤNG Ada PROGRAMMING

 BÀI Ada PROGRAMMING KIỂU MẪU DỄ NHỚ

with Ada.Text_IO;

use Ada.Text_IO;

procedure moon is

   var1 : String := "TRĂNG NON ĐẦU NGÕ NHỚ AI.";

   var2 : String := "SAO TRĂNG LẠI KHUYẾT ĐÊM DÀI GIÁ BĂNG.";

   var3 : String := "NHỚ AI TA ĐỨNG NHÌN TRĂNG";

   var4 : String := "HỎI TRĂNG CÓ MÚÔN CÙNG NÂNG RƯỢU NỒNG";

   var5 : String := "RƯƠỤ NỒNG UỐNG CẠN LÂNG LÂNG.";

   var6 : String := "GỬI NGƯỜI BÊN NỚ VẦNG TRĂNG U HOÀI.";

   var7 : String := "Bài thơ của Đặng Trung Ngôn viết Jan-11- 2016";

   var8 : String := "Henry Dương viết Oct-18-2020 theo Ada Programming";

begin

Put_Line(var1); Put_Line(var2); 

Put_Line(var3); Put_Line(var4); 

Put_Line(var5); Put_Line(var6);

Put_Line(var7); Put_Line(var8); 

end moon ;

 OUTPUT

GHI CHÚ.

Còn tiếp