Startsidan | Senaste ändringarna | Lista alla sidor | Sök
Programmeringsspråk utvecklat under 1970-talet.
with Ada.Text_IO; use Ada.Text_IO; with Ada.Integer_Text_IO; use Ada.Integer_Text_IO; procedure Main is My_Age : constant Integer := 666; Your_Age : Integer; begin -- En kommentar Put ("Hej, mitt namn är Satan, jag är "); -- Width anger hur stort fältet där siffran skall -- skrivas ut är. Noll innebär "använd hela talet" Put (Age, Width => 0); Put_Line (" år gammal."); Put ("Hur gammal är du: "); Get (Your_Age); if Your_Age < My_Age then Put_Line ("Hin håle är äldre än dig!"); elsif Your_Age > My_Age then Put_Line ("Hin håle är yngre än dig!"); else Put_Line ("Vi är lite gamla, du och jag."); end if; end Main;
Kategori: Programmeringsspråk
Senast ändrad av Nissebosselasse 21:27 - 25:e Februari 2008
Innehållet på denna sida kan ändras utav alla som är medlemmar på Blinkenlights, men du måste logga in för att kunna ändra något.
Datum
2024-05-13 08:12
Vecka: 20
Besökare
Inloggade: 0
Gäster: 605
Medlemmar
Medlemmar: 53576
Forum
Senaste inlägget: HAHA MÄNNISKAN LEVER ÄN (13:45 - 18:e Januari 2019, av Hetzz)
Wiki
Senaste ändringen:
3D (rev: 1, tid: 09:40 - 13:e November 2015)
Chatt
#blinkenlights @ Libera.Chat
Gratis shellkonton för IRC, webbsidor mm.