6.1.6 ADA

	- -  ADA- kieli
	with TEXT_IO; use TEXT_IO;
	procedure ADA_MALLI is
	  pragma MAIN;
	begin
	  PUT("Terve! Olen ADA- kielellä kirjoitettu ohjelma."); NEW_LINE;
	end ADA_MALLI;