Informatikos VBE

Nu va, aš irgi jau grįžau po egzamino. Užduotys tikrai lengvos, bijau tik, kad būsiu suklydės wordo ar excelio uždaviniuose.

Nebuvo ko suklysti.

Pirmą padariau per ~10-15 minučių, kaip visad, valanda sėdėjimo.. :)

Per tą valandą išnagrinėjau uždavinius, ir užrašiau per ~25 minutes.

Reik tikėtis, kad šimtukas bus :)

Normaliai... 3 i egza neatejo :) sedejom 6 zmones, i antra egzo etapa tik 2 nuejo. Uzduotys atrode nesunkios...

Nu va, aš irgi jau grįžau po egzamino. Užduotys tikrai lengvos, bijau tik, kad būsiu suklydės wordo ar excelio uždaviniuose.

Jep, man tas pats. Bet apskritai paėmus tai labai lengvas egzas. Programose nei rikiavimų, anei jokių sudėtingų veiksmų nereikėjo atlikti. Tikiuos bent jau virš 90 :)

Na tikėjausi lengvesnio, bet šiemet tai tikrai per lengvas buvo.. Puse praktinės dalies laiko teko laukti egzamino galo, kad galėčiau pasilikti užduotis su sprendimais. :)

Pasitikrinkim! Mano atsakymai:

1. D

2. 1) Pirmos eilutės įtrauka. 2) Tarpas tarp pastraipų. 3) Abipusė lygiuotė. 4) Pasviri simboliai.

3. a) išnaša. b) dokumento turiniu.

4. B

5. 11 | TRUE | 3

6. 1. SUM(B3:B7). 2. MAX(C3:C7). 3. AVERAGE(D3:D7). 4. MIN(E3:E7).

7. 1. C didėjimo. 2. surikiuoti mažėjančia tvarka.

8. term | www.likit.lt | enciko.html

9. Pakeisti tekso koduotę

10. C

11. 2 | 1 | 4

12. A

13. dokumentacija

14. C

15. C

16. C

17. A

18. 10 | 11 | 11

19. B

20.

while x<10 do
begin
 if x mod 2<>0
then WriteLn(x);
 x:=x+1;
end;

21. 2 | 3

22. D

23. 5 | 9 | 7

24. 3 | 789

25. 4 | 5 | 12

26. D

Pasitikrinkim! Mano atsakymai:

1. D

2. 1) Pirmos eilutės įtrauka. 2) Tarpas tarp pastraipų. 3) Abipusė lygiuotė. 4) Pasviri simboliai.

3. a) išnaša. b) dokumento turiniu.

4. B

5. 11 | TRUE | 3

6. 1. SUM(B3:B7). 2. MAX(C3:C7). 3. AVERAGE(D3:D7). 4. MIN(E3:E7).

7. 1. C didėjimo. 2. surikiuoti mažėjančia tvarka.

8. term | www.likit.lt | enciko.html

9. Pakeisti tekso koduotę

10. C

11. 2 | 1 | 4

12. A

13. dokumentacija

14. C

15. C

16. C

17. A

18. 10 | 11 | 11

19. B

20.

while x<10 do
begin
 if x mod 2<>0
then WriteLn(x);
 x:=x+1;
end;

21. 2 | 3

22. D

23. 5 | 9 | 7

24. 3 | 789

25. 4 | 5 | 12

26. D

viskas tas pats isskyrus:

1.C (pats dvejoju)

13.Licenzija

24. 3 ir 7

13. licencija

24. 3 ir 7

Visi kiti kaip ir pas tave...

Blemba praradau kokius 3 taškus iš testo.... Bet tikiuosi iš programų max gaut.. nes komentarų tiek prirašiau, kad net :)

13. licencija

24. 3 ir 7

 

Visi kiti kaip ir pas tave...

Blemba praradau kokius 3 taškus iš testo.... Bet tikiuosi iš programų max gaut.. nes komentarų tiek prirašiau, kad net :)

Per daug komentarų yra blogai. Jeigu užgožia programos tekstą, mažinami taškai. Pats testą be klaidų padariau, tik va dbr kraunuos del Writeln parašymo, o ne WriteLn ar numuš 100 ar pagailės :)

Aš irgi maniau, kad 13. licenzija, bet pasirinkau kitą.

24. Visąlaik galvojau, kad išmes programos klaidą dėl blogo skaičių formato. Namuose susikūriau ir pasirodo aš teisius. Blogas skaičių formatas, nes yra readln(integer), o skaiciai atkirti tarpais.

program T4;
type TMasyvas = array [1..5] of integer;
var A : TMasyvas;
n, i : integer;
fd : text;
begin
 assign(fd, 't4.txt');
 reset(fd);
 Readln(fd,n);
 for i:=1 to n do
 readln(fd,A[i]);
 close(fd);
 Writeln(a[2]);
 readln;
end.

Kada bus rezultatai? Kaip užknisa tos žioplos klaidos. Turbūt jau 100-ą paimti neteks, kai matau jūsų čia nemažai ant max'o padariusių yra :D

Heh, juokingas egzaminas :D

Testinius beveik visus gerai padariau. O programavime, tai pirma uzdavini padariau ir antra ipusejau... gal 70-80% ir sukrapstysiu kaip nors.

Ne egzas, o atgaiva po lietuvių :D

Kas dėl kabinėjimosi prie "Writeln" vs "WriteLn", tai tokiam žmogui kuris prisikabintų puikiai tiktų posakis "get a life...". Pascalio funkcijos nėra case-sensitive, tai reiškia, kad gali parašyt ir "WrItElN" ir vistiek liktum teisus, aišku tokiu atvėju visur šitaip reikia rašyti... :D Kas dėl programų, tai mus žiauriai nusikilo šiais metais, labai paprastos lyginant su kitais metais(2006-2009), nei rūšiuot ką nors reikėjo nei ką. Suskaičiuoji ir viskas... Dėl to ir baiminuosi, kogero didžioji dauguma programas padarė be klaidų ir balą nulems ten koki tūpi testo klausimai... :\

Dėl to ir baiminuosi, kogero didžioji dauguma programas padarė be klaidų

jau tikrai, kad ne. Mano nuomone apie 70% laikiusiu is B lygio ateje, isvis apie paskali ne bum-bum.

Bent jau aplinkui mane dauguma tokiu buvo :D

Kas dėl kabinėjimosi prie "Writeln" vs "WriteLn", tai tokiam žmogui kuris prisikabintų puikiai tiktų posakis "get a life...". Pascalio funkcijos nėra case-sensitive, tai reiškia, kad gali parašyt ir "WrItElN" ir vistiek liktum teisus, aišku tokiu atvėju visur šitaip reikia rašyti... :D Kas dėl programų, tai mus žiauriai nusikilo šiais metais, labai paprastos lyginant su kitais metais(2006-2009), nei rūšiuot ką nors reikėjo nei ką. Suskaičiuoji ir viskas... Dėl to ir baiminuosi, kogero didžioji dauguma programas padarė be klaidų ir balą nulems ten koki tūpi testo klausimai... :\

Egzistuoja toks dalykas kaip programavimo kultūra, na ir kas, kad gali rašyti 'laBAS', bet visi rašo 'Labas', ir jei darysi kitaip - esi neraštingas.

Egzistuoja toks dalykas kaip programavimo kultūra, na ir kas, kad gali rašyti 'laBAS', bet visi rašo 'Labas', ir jei darysi kitaip - esi neraštingas.

Jeigu Lietuvių kalbos taisyklės sakytų "pochui kaip rašai žodį 'labas'", tai ir neraštingu tavęs niekas nelaikytų. Čia lygiai tas pats, jei kalbai nusispjaut kaip rašai, tai kam dar *******ėt? Suprantu tokius dalykus kaip teksto formatavimą tam, kad skaityt būtų lengviau, arba tam tikrus pagal nutylėjimą priimtus kintamųjų pavadinimus (kaip pvz. skaitliukai i, j, k, l...), bet prisipisinėjimą prie žodžių kurie neturi JOKIOS reikšmės nei programos veikimui, nei bendram vaizdui, nei supratimui - šaudyt tokius vertintojus.

paaiskinkit ar gali taip but kai pas mane uzrasyta pav:string[15] o jis man vis tiek skaito visa eilute?

del tokio SH nepadariau antros uzduoties, namo atejes per 20 min padaryta ir viskas veikia...

24. Visąlaik galvojau, kad išmes programos klaidą dėl blogo skaičių formato. Namuose susikūriau ir pasirodo aš teisius. Blogas skaičių formatas, nes yra readln(integer), o skaiciai atkirti tarpais.

Deja, tu neteisus. Viskas ten gerai, nuskaito iš kiekvienos eilutės po pirmą skaitmenį. Ir atsakymas būtų 3 ir 7.

Šiaip egzas tikrai per lengvas buvo. Testą padariau per pusvalandį, taip nelabai skubėdamas. Po to dar pusvalandį gal peržiūrėjau ir biškį ant lapo užsimečiau praktines užduotis, tada per likusį pusvalandį dar kartą pasitikrindamas atsakymus surašiau juos į atsakymų lapą. Praktines užduotis padariau gal per pusvalandį, po to sedėjau ir laukiau galo, nes norėjau užduotis pasiimti sau. O šiaip tai tos praktinės užduotys tikrai laaaaaaaabai lengvos buvo. Palyginus kas buvo 2010 pavyzdinėj ir bandomojoj užduotyse, tai čia tikrai labai paprasta. Nei rikiavimo, nei vidurkio, nei diždiausios, nei mažiausios (ai buvo šitas šachmatuose) reikšmės radimo.

Mokytoja peržiūrėjo testą, tai prasimečiau lygioje vietoje. :D 25 klausime į k (n) reikšmę kažkaip kaip priskirtą prie ciklo pažiūrėjau, todėl parašiau 3, o ne 4. :D Nu bet šiaip, gal tas 1 taškas nesutrukdys gauti šimtukui. :D Tikiuosi ir programos testus praeis. Ar rašėte kur nors longint'ą vietoj integerio (tam atvejui jei testas būtų su nebesveikais dideliais skaičiais)? Aš tik su šachmatais primečiau, kad jei 100 vaikų ir kiekvienas ten po kelis šimtus atsineša tų šachmatų (žinau, nelogiška), tai parašiau longintą masyve. Dar kadangi daug laiko buvo, tai dar pavarčiau užduočių sąsiuvinį ir pasižiūrėjau koks ten rašymo stilius ir pagal tai pakoregavau savo programas, nes aš pvz po WriteLn (x); tarpo nededu, dar nuo pačio krašto palieku ne 2 tarpus, o 1 ir pan. Tai tokias smulkmenas pataisiau ir šiek tiek pakomentavau pagrindinius kintamuosius ir trumpai ką daro viena ar kita procedūra ar funkcija. Nors buvo, kas iš neturėjimo ką veikt komentavo vos ne kiekvieną eilutę. :D

Beje, negalvokit, kad čia buvo tiek daug, kas viską padarė. Mokytoja sakė, kad kas pas mus mokykloj laikė, tai ten gal iš 40 tik 1-2 padarė normaliai programas, o visi kiti žlugę. :D Sakė, kad buvo, kas bandė rašyti programas, tai parašė kelias eilutes ir išėjo...

Beje, ten kažkuriam atsakyme parašiau licenzija, o turėtų būti licencija. :D Tikiuosi gramatinių klaidų nežiūrės. :D

Iš mūsų mokyklos laikiusių maždaug 25-30 žmonių gerai programuot mokėjom gal kokie 5 žmonės. Kas būtų viską išsprendę - nebuvo. Man pritrūko laiko, teste prarasiu gal kokius 3 taškus o programą padariau visą pirmą, antros tik spėjau duomenis nuskaityti.. :D

Šimtukus gaus atrodo apie 10% tai 200 žmonių kažkur.

Šimtukus gaus atrodo apie 10% tai 200 žmonių kažkur.

Na dabar reikia laukti atnaujinimo nec.lt, kad sužinotume, kiek iš viso laikė. Tada galėsim spręsti ar tie 200 žmonių daug ar ne. :D

Blemba kažkaip reikia apginti Informatikos Olimpiados Vilniaus mieste I-os vietos titulą :D Gal....gal....kokiu stebuklingu būdu ir gausiu tuos 100 :\

Blemba kažkaip reikia apginti Informatikos Olimpiados Vilniaus mieste I-os vietos titulą :D Gal....gal....kokiu stebuklingu būdu ir gausiu tuos 100 :\

Tas titulas, kaip parašei skamba galingai, bet juk ta miesto olimpiada buvo laaaaaabai lengva, pas mus beveik visi, kas dalyvavo, paėmė 1 vietą (tarp jų ir aš :D).

Vilniuje rodos 21 žmogus pirmą paėmė bendrai