Simonas Kazlauskas nagisa

Pos(char what_to_find, string where_to_find)

Nustato char vietą string'e

Gražina integerį.

Program Example;
Var S : String;
begin

#Žurnalas

Parašykite žurnalą, su kuriuo būtų galima atlikti tokius veiksmus:

įterpti <pozicija> <skaičius> <tipas> – įterpia <skaičius> tipo <tipas> įrašų prieš įrašą, esantį pozicijoje <pozicija>. Įrašų, kurių pozicijos nemažesnės už <pozicija>, pozicijos padidėja per <skaičius>.

pašalinti <pozicija> <skaičius> – pašalina <skaičius> įrašų, pradedant nuo įrašo pozicijoje <pozicija>. Įrašų, kurių pozicijos nemažesnės už <pozicija> + <skaičius>, pozicijos sumažėja per <skaičius>.

užklausa <pozicija1> <pozicija2> – suskaičiuoja, kiek yra skirtingų tipų įrašų pozicijose nuo <pozicija1> iki <pozicija2> imtinai.

	attrlist = []
	def filter_cb(attr, attrlist):
	attrlist.append(attr)
	return False
	color_hex = color.to_color().to_string()
	markup = '<span color="{0}"></span>'.format(color_hex)
	attrs = Pango.parse_markup(markup, -1, '\01')[1]
	attrs.filter(filter_cb, attrlist)
	attrlist[0].end_index = GLib.MAXINT32
	layout.set_attributes(attrs)

	// C works correctly.
	// clang giotest.c -o giotest -pthread -I/usr/include/gtk-3.0 -I/usr/include/atk-1.0 -I/usr/include/at-spi2-atk/2.0 -I/usr/include/pango-1.0 -I/usr/include/gio-unix-2.0/ -I/usr/include/cairo -I/usr/include/gdk-pixbuf-2.0 -I/usr/include/glib-2.0 -I/usr/lib/glib-2.0/include -I/usr/include/harfbuzz -I/usr/include/freetype2 -I/usr/include/pixman-1 -I/usr/include/libpng15 -lgtk-3 -lgdk-3 -latk-1.0 -lgio-2.0 -lpangocairo-1.0 -lgdk_pixbuf-2.0 -lcairo-gobject -lpango-1.0 -lcairo -lgobject-2.0 -lglib-2.0

	#include<glib.h>
	#include<glib-object.h>
	#include<gio/gio.h>
	#include<gtk/gtk.h>
	#include<stdio.h>
	#include<stdlib.h>

	Ponas Jonas šiaurės Amerikoje augina tigrus. Tigrai yra tvarkingi gyvūnai ir reprodukciją atlieka privačiai. Jonas žino kokia tvarka nori suporuoti gyvūnus (jis net būsimų tigriukų vardus žino!), tačiau jo sąrašas buvo rastas visiškai išdarkytas. Jonui atgauti duomenis iš sąrašo pavyko, tačiau pamesta eilės tvarka. Jonas pasisamdė šaunųjį programuotoją Vytautą, kad tas jam padėtų vėl viską surikiuoti.

	==================
	Pradiniai duomenys
	==================

	Faile yra keletas `<eilė> <patelės vardas> <patino vardas> <būsimas tigriuko vardas>` eilučių. Paprastumo dėlei sakykime, kad vietoje vardo – tik inicialai (t.y. pirma vardo raidė).

	==========
	Rezultatai

	#include <stdio.h>
	#include <string.h>
	#include <stdlib.h>
	#include <inttypes.h>
	#include <time.h>

	#define USER_ACTIVE 1
	#define USER_SUSPENDED 0

	typedef struct book {

	entryListing :: Context a -> [Item a] -> Compiler String
	entryListing ctx entry = do
	entryItemTpl <- loadBody "templates/entry-item.html"
	applyTemplateList entryItemTpl ctx entry


	makePostList ctx = makeItem ""
	>>= loadAndApplyTemplate "templates/entries.html" ctx
	>>= loadAndApplyTemplate "templates/base.html" ctx
	>>= relativizeUrls

	os.environ['PYTHON'] = '/usr/bin/python2'
	os.environ['PYTHON_VERSION'] = '2.7'
	os.environ['PYTHONPATH'] = '/opt/gnome/lib/python2.7/site-packages/:/opt/gnome/lib/python3.3/site-packages/'

	import Text.Hyphenation (hyphenate, english_GB)
	import Text.Pandoc (bottomUp, Pandoc)
	import Text.Pandoc.Definition
	------------------------------------------------------------
	hyphenatePandoc :: Pandoc -> Pandoc
	hyphenatePandoc = bottomUp (hyphInline :: Inline -> Inline)
	where hyphW = intercalate "\x00AD" . hyphenate english_GB
	hyphWs = unwords . map hyphW . words
	hyphInline (Str str) = Str $ hyphWs str
	hyphInline a = a

	Mažesnis feature barjeras.
	Pavyzdžiui į aštuonioliktą versiją įkišo naują JS engine ir netoli matosi Australis tema.
	Jei būtų versijuojama ankstesniu principu, Mozilla release team'as būtų ko gero liepȩs
	laukti kol abu fyčersai bus paruošti kad būtų galima viską išleisti vienu major releasu.
	O dabar fyčersai ateina kada jie būna paruošti ± 2 mėn.