тип број  = бајт (4)
тип слово = бајт (1)

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

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

тип фајл_описивач (
	класични_улаз,
	класични_излаз)

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

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

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

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

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