- - 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;