Pradinis
Pagalba
Užsisakyk!
- Reklamą
- Hostingą
- El. pašto dėžutę
Užsisakyk!
Įrankiai
Pasidalink
- Visos temos
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | C#, Python, Java, JS, C++ klausimai |
Puslapis 1 iš 2 | 1 | 2 |
Autorius: IGEN | Peržiūrų: 32805 |
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Kam skirta ši tema? Ko gero kas trečias programuotojas gali pasakyti, kad geriausia pradėti programuoti yra nuo FPS. Todėl šią temą susikūriau būtent sau. Bet jūs ją laisvai galite naudoti tobulinant savo programavimo žinias. Noriu, kad jūs man kurtumete užduotis, dėtumete savo išspręstus ar niekaip neįveikiamus kodus. Aš bandysiu taip pat jas išspręsti, o jeigu nutiks taip, kad mano protas nepajėgs išlaužti kodą, prašysiu būtent jūsų pagalbos, būtent šioje temoje. Ačiū. Laukiu užduočių... |
|
Faitas. Narys Generolas Pranešimai: 1038 Įstojęs: 2010 Geg. 27 17:05:35 | |
Parašykite programą sekos: s; ss; sss; ssss; pirmųjų n narių sumai rasti. Čia s - bet kuris skaitmuo, išskyrus 0. Pvz., jei s=7, n=5, tai turi būti skaičiuojama tokia suma 7+77+777+7777+77777. Jei spręsite kiti, tai nedėkite čia sprendimo, jei kas nesupras, tiesiog siųskit AŽ, nes nebus tolko tada spręsti. Jei jau nesigaus, duosiu atsakymą (AŽ) Redagavo Faitas. 2011 Lap. 11 16:11:06 |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
Idekit sudetingesniu, ką šita per lengva. |
|
Faitas. Narys Generolas Pranešimai: 1038 Įstojęs: 2010 Geg. 27 17:05:35 | |
Išsisprendei? Jei jau, tai įdėsiu sunkesnių. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Faitas. parašė: Išsisprendei? Jei jau, tai įdėsiu sunkesnių. Neskubėk, kai išsipagiriosiu butinai išspręsiu. |
|
zygisn Narys Margas Pranešimai: 73 Įstojęs: 2010 Geg. 28 16:05:04 | |
Pradinis dėmuo – penkiaženklis skaičius a. Rezultatas – keturženklis skaičius b, gautas iš pradinio dėmens pašalinus vidurinįjį skaitmenį. Parašykite programą (su komentarais), kuri spręstų šį uždavinį. Skanaus |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
1) Uždavinys [BAIGTA]
|
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
2) Uždavinys [BAIGTA]
Labai patiko ačiū ZygisN Laukiu dar. |
|
zygisn Narys Margas Pranešimai: 73 Įstojęs: 2010 Geg. 28 16:05:04 | |
Pirkdami bilietus į koncertą iš anksto klausytojai moka po 5 litus, o paskutinę dieną – po 8 litus. Žinoma, kad iš viso parduota bilietų už n litų, iš kurių p surinkta paskutinę dieną. Parašykite programą, kuri suskaičiuotų, kiek klausytojų buvo koncerte. ----------- Orientuokis pagal šitus skaičius: Jeigu išviso parduota už 1000lt (paskutine diena buvo parduota už 400), tai išviso buvo 170 klausytojų. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Please help, užmuškit manę, bet per savaite mano smegeninė neišlaužė kaip reikia dabaigti šį uždavinį. Uždavinys daleiskim įrašomas penkiaženklis skaičius ir iš tų 5 skaičių turi spauzdinti skaičių, kuris kartojasi 3 kartus. Pavyzdžiui: Skaičius: 41344; Atsakymas: 4 , nes jis kartojasi tris kartus. Skaičius: 84838; Atsakymas: 8, nes jis kartojasi tris kartus.
Kas padės butinai +11 PASIDARIAU, KAM REIKES ATSAKYMO PM! HTTP://IGEN.LT - Web design & graphics solutions... Redagavo IGEN 2011 Lap. 26 17:11:58 |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Užduotis: Duodami trys skaičiai a, b, c ir reikia spauzdinti jų vidurinį skaičių. Pavyzdžiui: 162, 123, 984; Atsakymas = 162, nes jis vidurinis. Esu garantuotas, kad programa sumažinti 20x kartų.
HTTP://IGEN.LT - Web design & graphics solutions... |
|
bruzgis Narys Ekspertas Pranešimai: 3368 Įstojęs: 2006 Geg. 9 18:05:02 | |
klaidas sintakses issitaisyk |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
Man atrodo kad sudêtiniuose ifuose loginiu veiksmu atlikti negalima, jei neklystu... |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
Visiems užduotėlė. Kol kas tik viena. Patiks- duosiu dar vieną. Nėra labai sudėtinga, pats padariau per pusę valandos. Parsisiuntimo nuoroda: http://www.failai.lt/3zcku8ncyga...na.pdf.htm Sėkmės p. S. Jei norite programėlės pavyzdžio PM man. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Hs Labai patiko. Mokyojas atsiunte 8-9kl. ; 10-12kl olimpiadinius uždavinius. Kolkas išsprendžiau tik jį Like!
HTTP://IGEN.LT - Web design & graphics solutions... Redagavo IGEN 2011 Lap. 30 19:11:22 |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
ZygisN parašė: Pirkdami bilietus į koncertą iš anksto klausytojai moka po 5 litus, o paskutinę dieną – po 8 litus. Žinoma, kad iš viso parduota bilietų už n litų, iš kurių p surinkta paskutinę dieną. Parašykite programą, kuri suskaičiuotų, kiek klausytojų buvo koncerte. ----------- Orientuokis pagal šitus skaičius: Jeigu išviso parduota už 1000lt (paskutine diena buvo parduota už 400), tai išviso buvo 170 klausytojų. Labai vaikiškas... Bet ačiū.
HTTP://IGEN.LT - Web design & graphics solutions... |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
3www tavo programėlė visai patiko, bet jei neprieštarausi noriu duoti šiek tiek kritikos: 1. Truputi tvarkos, labai netvarkingai. Reikia viską pagal taisyklės sulygiuoti. 2. Naudok truputi ir komentarų, kad būtų galima lengvai net ir pašaliniam suprasti (naudok bent aprašydamas kintamuosius(. 3. kažkaip keisti tie apribojimai. Kiek supratau jie tiesiog išmeta „Iseita is ribojimo“ ir programa vykdoma toliau. Juos reikia dėti į ciklą, kad jei pvz per didelis skaičius išmestų „Skaičius per didelis. Galima skaičiaus maksimali reikšmė yra n. Bandykite vėl“ ir vėl turi įvesti iš naujo. Arba jei čia failas labiau tiktų visą dalį po to if'o įdėti į „begin“ ir „end“ kad ignoruotu jei reikšmė pvz per didelė ir į failą išspausdintų „Skaičius per didelis. Galima skaičiaus maksimali reikšmė yra n. Bandykite vėl“. 4,. Gudriai pastebėjai koordinačių skaičiavime, kad negali išeiti iš duotos ribos. Bet manau kad būtum sugebėjęs įdėti viską į vieną sudėtinį if'ą. Prisimink kad sudėtinį if'ą programa supranta kaip vieną veiksmą ir ji mažiau apkraunama. Tai tiek, gal nori dar vieną uždavinuką? Be to sėkmės. O jei atsibos PasCal kalba, pradėk mokintis C++. Man ji žymiai labiau patinka. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Hs parašė: 3www tavo programėlė visai patiko, bet jei neprieštarausi noriu duoti šiek tiek kritikos: 1. Truputi tvarkos, labai netvarkingai. Reikia viską pagal taisyklės sulygiuoti. 2. Naudok truputi ir komentarų, kad būtų galima lengvai net ir pašaliniam suprasti (naudok bent aprašydamas kintamuosius(. 3. kažkaip keisti tie apribojimai. Kiek supratau jie tiesiog išmeta „Iseita is ribojimo“ ir programa vykdoma toliau. Juos reikia dėti į ciklą, kad jei pvz per didelis skaičius išmestų „Skaičius per didelis. Galima skaičiaus maksimali reikšmė yra n. Bandykite vėl“ ir vėl turi įvesti iš naujo. Arba jei čia failas labiau tiktų visą dalį po to if'o įdėti į „begin“ ir „end“ kad ignoruotu jei reikšmė pvz per didelė ir į failą išspausdintų „Skaičius per didelis. Galima skaičiaus maksimali reikšmė yra n. Bandykite vėl“. 4,. Gudriai pastebėjai koordinačių skaičiavime, kad negali išeiti iš duotos ribos. Bet manau kad būtum sugebėjęs įdėti viską į vieną sudėtinį if'ą. Prisimink kad sudėtinį if'ą programa supranta kaip vieną veiksmą ir ji mažiau apkraunama. Tai tiek, gal nori dar vieną uždavinuką? Be to sėkmės. O jei atsibos PasCal kalba, pradėk mokintis C++. Man ji žymiai labiau patinka. Turiu dabar 5 uždavinukus olimpiadinius. O negaliu mokintis jokių kalbų tik PasCal, nes laukia egzaminas, o aš nelabai moku jį. HTTP://IGEN.LT - Web design & graphics solutions... |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
Aš dalyvausiu kitą mėnesį PasCal miesto olimpiadoje (esu tik devintokas -_-). Bet manau kitais metais sudalyvauti C++ olimpiadoje, nes jau busiu daug lamai išmokęs. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Hs parašė: Aš dalyvausiu kitą mėnesį PasCal miesto olimpiadoje (esu tik devintokas -_-). Bet manau kitais metais sudalyvauti C++ olimpiadoje, nes jau busiu daug lamai išmokęs. Na matau tau puikiai sekasi Sekmės tau ir padėk ruoštis valstybiniam informatikos egzaminui HTTP://IGEN.LT - Web design & graphics solutions... |
|
KiraLT Narys Pulkininkas Pranešimai: 382 Įstojęs: 2010 Rugs. 3 20:09:07 | |
Tu teorija mokinkis, kiek žn ten 80% teorijos. |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Hs parašė: Tu teorija mokinkis, kiek žn ten 80% teorijos. Na reiks pasimokinti ir dalį to, tiek dalį to... Esu girdėjas, kad kiti abiturientai net nesprendžia uždavinių. Padaro teoriją ir išeina lauk. HTTP://IGEN.LT - Web design & graphics solutions... |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Kaip reikia convertuoti? Iš char noriu pereiti į integer.
HTTP://IGEN.LT - Web design & graphics solutions... |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Kas padėtu ir išspręstu http://www.3www.lt/gimtadienis-v... Atsilyginsiu. HTTP://IGEN.LT - Web design & graphics solutions... |
|
bruzgis Narys Ekspertas Pranešimai: 3368 Įstojęs: 2006 Geg. 9 18:05:02 | |
paprasta. issiskaidyk i tris skaicius, TUomet sudarinek galimas datas, tinkancias datas susirasyk i masyva, gale patikrink ar masyve yra elementu, jei nera - klaidinga data Simbolių eilutės Tai simbolinio tipo praplėtimas. Šio tipo reikšmės - simbolių eilutės, kurias sudaro kompiuterio abėcėlės simbolių kombinacijos. Maksimalus simbolių skaičius eilutėje yra 256. Simbolių eilutė žymima standartiniu vardu string. Tačiau galimas ir toks aprašymas: string[<maksimalus leistinas simbolių skaičius>] Pavyzdžiui: var zodis: string; zodzio_dalis: string[5]; Kintamasis zodis galės turėti ne daugiau negu 256 simbolius, o kintamasis zodzio_dalis - ne daugiau kaip 5. Pavyzdžiui, atlikus priskyrimus: zodis:='Jonas'; zodzio_dalis:=''; kintamasis zodis įgis reikšmę 'Jonas', o kintamasis zodzio_dalis taps tuščia simbolių eilute, t.y. eilute, kurioje nėra nė vieno simbolio. Tarp eilučių galima sąjungos operacija. Pavyzdžiui, jeigu vardas ir pavardė yra string tipo kintamieji, vardas reikšmė yra 'Jonas', pavardė reikšmė yra 'Petraitis', tai reiškinio: vardas + ' ' + pavardė reikšmė bus 'Jonas Petraitis'. Dirbant su eilutėmis, galima naudoti indeksus, t.y. dirbti kaip su simbolių masyvais. Pavyzdžiui, vardas[1] bus lygu 'J', o vardas[2] bus lygu 'o'. Eilutes galima lyginti (operacijos =, <>, <, >, <=, >=). Lyginama nuo pirmo simbolio, pagal jų kodus. Pavyzdžiui: 'abc' > 'ab', 'ASILAS' < 'alga'. Pastaba. Atkreipkite dėmesį į du dažnai panaudojamus programų fragmentus, kai s ir p yra string tipo. 1. p:= ''; for i := 1 to length(s) do p:= p + s[i]; 2. p:=’’; for i := 1 to length(s) do p:= s[i] + p; Jei s yra žodis ar sakinys, tai pirmame programos fragmente ir p bus tas pats žodis ar sakinys, o kitu atveju p yra tas žodis ar sakinys užrašytas iš kito galo. Dirbant su eilutės tipo kintamaisiais gali būti naudojamos veiksmų su eilutėmis funkcijos ir procedūros. Veiksmų su eilutėmis funkcijos ir procedūros Darbui su eilutėmis dažniausiai naudojamos šios standartinės funkcijos: pos(s1, s) - nurodo simbolių eilutės s1 pradžią eilutėje s. Jei s1 įeina į s, tai funkcija pateikia pirmojo eilutės s1 simbolio eilutėje s numerį. Priešingu atveju pateikiamas 0. Pavyzdžiui, pos('cd', 'abcdef') reikšmė bus lygi 3. concat(s1, s2, ... , sn) - sujungia eilutes s1, s2, ... , sn į vieną. Tai sąjungos operacijos '+' analogas. copy(s, m, n) - pateikia eilutės s n simbolių pradedant pozicija m. Pavyzdžiui, jeigu string tipo kintamojo tekstas reikšmė yra 'abcdefghij', tai funkcijos copy(tekstas, 3, 2) reikšmė bus 'cd'. length(s) - randa eilutės s ilgį. Pavyzdžiui, jei s reikšmė lygi 'Jonas', tai length(s) reikšmė bus lygi 5. upcase(s) - eilutės s mažąsias raides pakeičia didžiosiomis. Veikia tik lotyniškos abėcėlės raides, kitų simbolių nekeičia. Pavyzdžiui, jeigu s reikšmė lygi 'Labas rytas!', tai upcase(s) reikšmė bus 'LABAS RYTAS!'. lowercase(s) - eilutės s didžiąsias raides pakeičia mažosiomis. Veikia tik lotyniškos abėcėlės raides, kitų simbolių nekeičia. Pavyzdžiui, jeigu s reikšmė lygi 'Labas rytas!', tai lowercase(s) reikšmė bus 'labas rytas!'. Darbui su eilutėmis dažniausiai naudojamos šios standartinės procedūros: delete(s, m, n) - šalina dalį eilutės, čia s - string tipo kintamasis (simbolių eilutė), m - nuo kur šalinti simbolius, n - kiek simbolių šalinti. Pavyzdžiui, jei vardas kintamojo reikšmė lygi 'Jonas', atlikus procedūrą delete(vardas, 3, 2) - kintamojo vardas reikšmė bus 'Jos'. insert(s1, s, n) - įterpia į eilutę s kitą eilutę s1 pradedant n-tąja pozicija. Pavyzdžiui, jei kintamojo pavarde reikšmė lygi 'Petraitis' atlikus procedūrą insert('uk', pavarde, 5), pavarde atrodys taip - 'Petrukaitis'. str(r, s) - transformuoja sveikąjį arba realųjį skaičių r į tekstą (simbolių eilutę) s. Kaip ir procedūroje writeln, galima nurodyti, kiek pozicijų skiriama transformuojamam duomeniui, ir jei r - realusis, kiek turi būti ženklų po kablelio. Pavyzdžiui, jeigu i - sveikojo tipo kintamasis, kurio reikšmė lygi 10, o tekstas - string tipo, tai, atlikus procedūrą str(i+11, tekstas), kintamojo tekstas reikšmė bus lygi '21', o atlikus procedūrą str(i+11.5:5:2, tekstas), kintamojo tekstas reikšmė bus lygi '21.50'. val(s, r, kodas) - transformuoja tekstą (simbolių eilutę) s į sveikojo arba realiojo tipo kintamąjį r. kodas - integer tipo kintamasis, nurodantis pirmojo neteisingo simbolio numerį; jei jo reikšmė, atlikus procedūrą val, yra lygi 0, tai transformuota sėkmingai. Pavyzdžiui, jeigu string tipo kintamojo tekstas reikšmė yra '123', o i - sveikojo tipo, tai, atlikus procedūrą val(tekstas, i, kodas), kintamojo i reikšmė bus 123, o kintamojo kodas reikšmė bus 0. p:= ''; for i := 1 to length(s) do p:= p + s[i]; situo principu prasuki cikla pirmi du ciklo elementai pirmas skaicius ketvirtas, penktas - antras skaicius 7,8 elementai - trecias skaicius O tuomet jau deliok, tikrink ir isirasinek i masyva Redagavo bruzgis 2011 Gru. 4 15:12:00 |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
O kaip išskaidyti skaičius pačioje pradžioje? Iš char pereiti į integer? Draugas rašė taip, kad reikia daryti funkciją, bet ar tai tiesa?
Sunkiai su tom funcijom/procedurom sekasi, gal kas apie ją smulkiai gali paaiškinti? Su keliais lengvais pavizdžiais? HTTP://IGEN.LT - Web design & graphics solutions... |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Atsiprasau, kad be lietuvisku raidziu, kitas kompiuteris. Uzduotis: http://egzaminai.lt/failai/149_u...VBE_IT.pdf Scriptas:
Ir meta klaida! Nr.: 106 - Bad numeric format. Kas pades atsilyginsiu. HTTP://IGEN.LT - Web design & graphics solutions... |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
MENKI ČIA PASCAL PROGRAMUOTOJAI HTTP://IGEN.LT - Web design & graphics solutions... |
|
bruzgis Narys Ekspertas Pranešimai: 3368 Įstojęs: 2006 Geg. 9 18:05:02 | |
tai, kad uz tave niekasneprogramina, tai menki programuotojai? |
|
Žmogus Narys Viršesnis už Dievą Pranešimai: 5621 Įstojęs: 2006 Gru. 8 17:12:08 | |
chipass parašė: tai, kad uz tave niekasneprogramina, tai menki programuotojai? Nu menki, ką padarysi, nesulauksi pagalbos reiškias ://// O šiaip Reset(rez); rašyk rewrite Redagavo Žmogus 2011 Gru. 14 15:12:57 |
|
sniuff Narys Antras po Dievo Pranešimai: 4491 Įstojęs: 2007 Geg. 14 16:05:52 | |
http://androider.info/ |
|
efkixas Narys Patrankų mėsa Pranešimai: 1 Įstojęs: 2012 Bal. 21 15:04:43 | |
Sveiki man iškilo bėdu su viena programa gal galėtumete padėti? tekstiniam faile txt. irasyti duomenys 4 Jonas 6 2,30 Petras 7 4,70 Antanas 2 5,20 Zigmas 5 6,70 rezultatu faile rez.txt turi gautis: Zigmas 33,5 Petras 32,9 Jonas 13,8 Antanas 10,4 Didziausias klientas - Zigmas Maziausias klientas - Antanas Reikia parasyti procedura skaitymui, rasymui,rikiavimui ir funkcijas didziausia ir maziausia skaiciui rasti. Būčiau dėkingas |
|
sniuff Narys Antras po Dievo Pranešimai: 4491 Įstojęs: 2007 Geg. 14 16:05:52 | |
Mes cia ne tam kad tau programa parasytume, o tam kad padetume. Kas tau neaaisku? http://androider.info/ |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Netikrinau labai kruopščiai, bet turėtu veikti |
|
Juste22 Narys Patrankų mėsa Pranešimai: 6 Įstojęs: 2012 Bal. 30 20:04:07 | |
Sveiki, nelabai suprantu pascalio vienos užduoties... Gal galite padėti? O ji skamba taip: Parašykite programą,kuri nustatytų ar du apskritimai kertasi, jeigu yra žinomi jų spinduliai r1 ir r2 bei centrų koordinatės (xc1;yc1) ir (xc2; yc2) pvz r1=5 r2=7 xc1=0, yc1=0, xc2=4 yc=1 Apskritimai kertasi. r1=1 r2=1 xc1=0, yc1=0, xc2=10 yc=10 Apskritimai nesikerta Labai aciu~! |
|
IGEN Narys Buldozeris Pranešimai: 222 Įstojęs: 2011 Kov. 5 20:03:33 | |
Įdomus, kai turėsiu laiko išspręsiu Tai bus iki pirmadienio tikrai |
|
Juste22 Narys Patrankų mėsa Pranešimai: 6 Įstojęs: 2012 Bal. 30 20:04:07 | |
Labai ačiū, bet gal iki rytojaus??? Na, gerai bus ir iki pirmadienio |
|
audrius159 Narys Patrankų mėsa Pranešimai: 4 Įstojęs: 2012 Geg. 4 21:05:22 | |
Jei dar kam reikia. program apskritimai; Var r1, r2, xc1, yc1, xc2, yc2, ats : real; begin Write ('Įveskite pirmo apskritimo centro koordinates (xc1 ir yc1) '); ReadLn (xc1, yc1); Write ('Įveskite pirmo apskritimo spindulį: '); ReadLn(r1); Write ('Įveskite antro apskritimo centro koordinates (xc2 ir yc2) '); ReadLn (xc2, yc2); Write ('Įveskite antro apskritimo spindulį: '); ReadLn(r2); ats := sqrt (Sqr (xc1 - xc2) + Sqr (yc1 - yc2)); {apskaičiuojamas nuo vieno apskritimo centro iki antro apskritimo centro atstumas} if ats - r1 <= 0 then WriteLn ('kertasi') else if ats - r2 <= 0 then WriteLn ('kertasi') else WriteLn ('Nesikerta'); Readln; end. |
|
Juste22 Narys Patrankų mėsa Pranešimai: 6 Įstojęs: 2012 Bal. 30 20:04:07 | |
Oho! Labai labai ačiū kaip tu taip moki? Kad ir aš taip mokėčiau... Paskolink arba atiduok savo smegenis |
|
martynasjet Narys Fruktas Pranešimai: 22 Įstojęs: 2010 Bal. 16 20:04:51 | |
Sveiki Gal cia biski neitema. Bet noreciau, kad ivertintumet mano programa. Kuria sukuriau per pora dienu naudojantis graph bibliotekos priemonemis. Ir jei pakeisite laika 22-4 tada rodis zvaigzdes. Pabandykit. Atsisiusti galite is cia. http://fliiby.com/file/1215484/j...aozf6.html Ai sitoj programoje yra vienas bugas, kurio dar nelabai moku istaisyti. Kadangi norejau padaryti kad nerodytu kompiliatoriaus taigi noredami isjunkti programa spauskite ESC. P.S greitai sukursiu testa su pascaliu naudojant grafikos priemones ir pasidalinsiu programa su jumis. O cia pasidalinu kodu. Programa nustato ar trikampis yra status ir ar susidaro trikampis.
Cia jau seniai turiu ja taigi ji dar nera "grafiskai" normaliai padaryta, bet manau ne tas svarbiausia yra. P.S jeigu reikia pagalbos parasykite man , jeigu mokesiu ir bus laiko padesiu. |
Puslapis 1 iš 2 | 1 | 2 |
Peršokti į forumą: |