тип број  је 4 бајт;
тип слово је 1 бајт;

тип логика је (
	лаж,
	истина)

тип системски_позив је (
	системски_позив_читај   =  0,
	системски_позив_пиши    =  1,
	системски_позив_отвори  =  2,
	системски_позив_затвори =  3,
	системски_позив_изађи   = 60)

тип описивач је (
	стандардни_улаз,
	стандардни_излаз)

улаз програм је главна

процедура дужина_текста (текст је низ слово) је
	дужина је број = 0
	док текст (дужина) није 0 онда
		дужина ++
	назад

процедура штампај (текст) је
	системски_код (системски_позив_пиши, класични_излаз, текст, дужина_текста (текст).дужина)
крај

здраво    () штампај ("Здраво!")
видимо_се () штампај ("Видимо се!")

глобална_константа = 666

процедура главна је
	здраво ()
	док а је 1 ... 17 је
		ако а % 3 је 0 или а % 5 је 0 онда
			штампај ("физ + баз")
		иначе ако а % 3 је 0 онда
			штампај ("физ")
		иначе ако а % 5 је 0 онда
			штампај ("баз")
		иначе
			штампај ("<->")
		штампај ("\n")
	крај
	видимо_се
	врати 60
крај

-----------------------------------------------

одреди слово = 1;
одреди број  = 4;

одреди описивач (
	улаз,
	излаз)

одреди системски_позив (
	читај   =  0,
	пиши    =  1,
	отвори  =  2,
	затвори =  3,
	изађи   = 60)

текст:  слово = "Здраво свете!";
дужина: број  = 12;

главна_процедура ():
	изврши (пиши, излаз, #текст, дужина);
	врати;;