Sampo (ohjelmointikieli)
Sampo on vuonna 1983 kehitetty, suomen kieleen perustuva opetuskieleksi tarkoitettu ohjelmointikieli. Sen avainsanastoon kuuluu esimerkiksi sijapäätteitä.[3] Kielen kehitti Syslab Ay yhdessä Oulun yliopiston kanssa ja sitä on käytetty opetuksessa Oulussa Karjasillan lukiossa.[2]
| Sampo (ohjelmointikieli) | |
|---|---|
| Julkaistu | 1983[1] |
| Kehittäjä | Heikki Putkonen, Ilkka Tervonen, Kari Kuutti [1] |
| Vaikutteet | Logo[1][2], Forth[2] |
| Käyttöjärjestelmä | MikroMikon ja Visiotek AMC-100:n käyttöjärjestelmät[1] |
Esimerkkejä muokkaa
Alla oleva esimerkki on otettu Mikro-lehdestä.[2]
MUUTTUJA ALOTUS MUUTTUJA LOPETUS 8 JONO PUHE ( TOIVOTAN KAIKKI TERVETULLEIKSI ) ALOTUS LLE ( ÄÄNESTÄKÄÄ MINUA ) LOPETUS LLE ( ELÄMME SUURISSA VAIKEUKSISSA ) 1 PUHE LLE ( TULEVAISUUS ON EPÄVARMAA ) 2 PUHE LLE ( MEHUA JA HILLOMUNKKEJA KAIKILLE ) 3 PUHE LLE ( ELÄKELÄISET KUNNIAAN ) 4 PUHE LLE ( NÄLKÄVYÖTÄ ON KIRISTETTÄVÄ ) 5 PUHE LLE ( KOTIÄIDEISSÄ ON TURVAMME ) 6 PUHE LLE ( LAPSILISÄT KAKSINKERTAISIKSI ) 7 PUHE LLE ( OPINTORAHA KYMMENKERTAISEKSI ) 8 PUHE LLE LUO : PITUUS PIKAPUHE ALOTUS ARVO . RIVI :PITUUS KERTAA 8 SATTUMA PUHE ARVO . RIVI VIELÄ? LOPETUS ARVO VALMIS
Ohjelma asettaa ensin PUHE-taulukkoon sekä ALOTUS ja LOPETUS -muuttujiin merkkijonoja ja määrittelee sen jälkeen PIKAPUHE-aliohjelman, jolla on PITUUS-parametri.
Aliohjelma tulostaa aloituksen, argumenttina annetun määrän satunnaisia merkkijonoja taulukosta sekä lopetuksen.
Sampoon kuuluu ydinominaisuutena tuki kilpikonnagrafiikalle.[1] Alla oleva esimerkki esittelee tätä tukea.
KONNA ASEMA NÄYTÄ PINO NÄYTÄ
LUO :KOKO KAARI
8 KERTAA :KOKO ETEEN 10 OIKEA VIELÄ?
VALMIS
LUO :KOKO TERÄLEHTI
2 KERTAA :KOKO KAARI 8 * 10 = VASEN 180 VASEN VIELÄ?
VALMIS
LUO :KOKO KUKKA
6 KERTAA :KOKO TERÄLEHTI 60 OIKEA VIELÄ?
VALMIS
10 KERTAA 640 SATTUMA 400 SATTUMA PAIKKA 20 SATTUMA KUKKA VIELÄ?Aiheesta muualla muokkaa
Lähteet muokkaa
- ↑ a b c d e Arto Ylikotila: Psykologiasta pohja kehitykselle - Oulussa taotaan kouluille SAMPOa. Insinööriuutiset, 24.4.1985, s. 16.
- ↑ a b c d Sampo opettaa suomeksi lapset ohjelmoimaan. Mikro, 4/1984, s. A-5. Tietoviikko.
- ↑ Ville-Matias Heikkilä: Toisenlaiset tietokoneet. Skrolli, 1/2016, s. 39. Skrolli ry. ISSN 2323-8992.