ATTLEF

http://kinoseansas.cwahi.net/ kaip matot dar niekas normaliai neveikia bet kaip vertinate dizaina ?

gali atsiust man ta logo galeciau pagelbet siektiek pagyvint skype mano art0jas

na seip ir as kuriu saita aisku dar nedaug kas veikia bet galit pakritkuot dizaina http://kinoseansas.cwahi.net/ :)

su kuo kurei slideshow?

Duotas skaičius n. Parašyti programą, kuri atsitiktinai parinkdama koordinates ir spalvą nubrėžtų n linijų. Kiekviena linija prasideda nuo buvusios linijos galo. zinau kad lengva bet nesigauna jei galit padekit Uses graph; Var g, m, x, y, x1, y1, s, i: integer; Begin g := detect; Initgraph(g, m, ''); Randomize; for i:= 1 to 10 do begin X:=random(1000); Y:=random(700); X1:=random(1000); Y1:=random(100); s:= random(15) + 1; setcolor(s); Line (x, y, x1, y1); End; Readln; End VA TIEK AS PADARES BET KAIP TOLIAU NEZINAU , hELP