Peupeu

Vienoj programoj skaityme naudojami, kitoj ne, nesuprantu aš :rolleyes: tai nuims taškų ar ne jei juos naudosiu :unsure: hmm :D jei laiko mažai bus nesiterliosiu su lokaliais :lol:

idomiai, kai kur naudojami globalūs kintamieji :blink:

Aš girdėjau, kad juos greit atjungia, paleisdami srovę per rėmą. :huh:

max vieną tašką nuims už globalius kintamuosius:) pasiskaityk vertinimo instrukciją, bent man taip atrodo http://nec.lt/failai/1723_IT_-1-vert-2010.pdf :ph34r:

o už ką turėtų baust? :blink: . Funkcija veikia, funkcija skaičiuoja, ko daugiau reikia :lol:

aišku, kad galima B-)

ašies nustatymuose nustatyk minimalią reikšmę

labai pravartus dalykas, gerokai pagreitina kodo rašymą. ^_^

tingiu netgi žiūrėti, kaip išsprendei :D tikiuos tokių nebus egze :lol:

tai, kad užduotėlės paprastos, beveik indentiškos, pagr. sesijos užduotims :)

būna ir paprasta virš 100 prirašai, egzaminas - ne olimpiada, ji skirta paprastiems mokiniams, įsivaizduok, įdėtų olimpiadines užduotis į matematikos egzaminą, nereik čia panikuot prieš egzą ir kelt bangų :lol:

nuoroda, bet niekada nemačiau, kad reiktų taip rikiuot, manau nereik to :rolleyes:

hmm, paskalyje idomu, ar yra toks dalykas, nesusiduriau su tokia bėda dar :unsure:

Maža ką jis sakė. Tegu paskui neverkia, kad nieks į fizinius mokslus nestoja, kai prigąsdina :D. Laiko netrumpino, neskleisk gandų : nuoroda :). p.s. kaip suprast užduotys įdėtos? Jos yra kuriamos, jų iš niekur netraukia, buvo sudaryta speciali uždavinių sudarymo komisija.

Štai dar viena VBE užduotėle pascal kalba, 2010 2užd. Gimtadienis: program gimtadienis; const Cn = 10 ; Cp = 6; type patiekalas = record pav : string[15]; Pkaina : integer; end; Tmass=array[1..Cp] of integer; svente=array[1..Cn] of patiekalas; //------------------------------------------------------------------------------ var gimt : svente; n, p : integer; //------------------------------------------------------------------------------ function patkain(a, b : Tmass) : integer; var i : integer; begin patkain:=0; for i:=1 to n do patkain+=a[i]*b[i]; end; //----------------------

pasirinktinis rušiavimas/tvarka/(sausis,vasaris....) ;)

puslapis gal ne per geriausias, bet neblogai, lietuviškai, aiškina paskalį, man atrodo. Pats nežiūrėjau, tik prasukau. Nuoroda :)

išmok skaityti iš failo, rašyti į failą, kaip aprašyti funkcijas, procedūras... Parodyk, kad moki, programa gali visiškai neveikt ir gausi taškų :)

pažymėk sritis, kuriu tau reikia sukurk stulpelinę diagramą, tada ant to stulpelio, kur peversti reik i linijinę spausk dešinį pelės klavišą (keistį tipą) ir tiek. Jei nesuprasi ar dar turėsi klausimų klausk, turiu padaręs visas šias užduotis(galiu atsiūst visas) :)

Klausimėlis, jeigu norėčiau rasti ne pirmą esantį elementą sąraše, bet paskutinį, tarkim jei yra keli surinke max taškų, štaip veiks?: function valdovas : integer; var i, max, index : integer; begin max:= diev[1].task; for i:=2 to n do begin if diev[i].task>max then begin max:=diev[i].task; index:=i; end else if (diev[i].task=max) and (diev[i].lyg<diev[index].lyg) then index:=i; else if (diev[i].task=max) and (diev[i].lyg=diev[index].lyg) then index:=i; end; valdovas:=index; end; Arba p

kodėl aš visada galvojau, kad čia burbulo metodas :rolleyes: : repeat rusiavimas:=false; for j:=2 to 5 do if x[j]<x[j-1] then begin din:=x[j]; x[j]:=x[j-1]; x[j-1]:=din; rusiavimas:=true; end; until not rusiavimas;

rikiavimas...

Klysti, kai padarei y= 4y^+12y+9 diskriminanta skaičiuoji neprekėlęs y į kitą pusę 4y^+11y+9=0 D= 121 - 4*9*4 = neigiamas Sprendinių nėra

informatika yra daug kur :) pvz mano draugė studijuoja molekulinę biologiją, antrame kurse jai teko programuoti JAVA, 3čiame PYTHONU :)

į masyvą įrašo 'ivertinimai.txt' įvetinimus, juos rikiuoja ir į ekraną atspausdina juos didėjančia tvarka.