Redigerer
Algol 60
(avsnitt)
Hopp til navigering
Hopp til søk
Advarsel:
Du er ikke innlogget. IP-adressen din vil bli vist offentlig om du redigerer. Hvis du
logger inn
eller
oppretter en konto
vil redigeringene dine tilskrives brukernavnet ditt, og du vil få flere andre fordeler.
Antispamsjekk.
Ikke
fyll inn dette feltet!
== Eksempler på programmering i Algol 60 == Dette programmet regner ut gjennomsnittet av absoluttverdiene for alle elementene i et array, det er skrevet i referanse-Algol. I en konkret implementasjon ville det ha et avvikende utseende. '''comment''' the main program (this is a comment); '''begin''' '''integer''' N; Read Int(N); '''begin''' '''real array''' Data[1:N]; '''real''' sum, avg; integer i; sum:=0; '''for''' i:=1 '''step''' 1 '''until''' N do '''begin''' '''real''' val; Read Real(val); Data[i]:='''if''' val<0 '''then''' -val '''else''' val '''end'''; '''for''' i:=1 '''step''' 1 '''until''' N '''do''' sum:=sum + Data[i]; avg:=sum/N; Print Real(avg) '''end''' '''end'''
Redigeringsforklaring:
Merk at alle bidrag til Wikisida.no anses som frigitt under Creative Commons Navngivelse-DelPåSammeVilkår (se
Wikisida.no:Opphavsrett
for detaljer). Om du ikke vil at ditt materiale skal kunne redigeres og distribueres fritt må du ikke lagre det her.
Du lover oss også at du har skrevet teksten selv, eller kopiert den fra en kilde i offentlig eie eller en annen fri ressurs.
Ikke lagre opphavsrettsbeskyttet materiale uten tillatelse!
Avbryt
Redigeringshjelp
(åpnes i et nytt vindu)
Navigasjonsmeny
Personlige verktøy
Ikke logget inn
Brukerdiskusjon
Bidrag
Opprett konto
Logg inn
Navnerom
Side
Diskusjon
norsk bokmål
Visninger
Les
Rediger
Rediger kilde
Vis historikk
Mer
Navigasjon
Forside
Siste endringer
Tilfeldig side
Hjelp til MediaWiki
Verktøy
Lenker hit
Relaterte endringer
Spesialsider
Sideinformasjon