VPrijavaPrijavi se

Програмерски кутак

Arhiva309 odgovora· poslednji 21. jan 2017.
СК
Citat:int main()
{
while (1)
{
printf ("Hello bitches\n\a");
}
}
Citat:int main()
{
while (1)
{
printf ("Evo, mislim da smo i mi zasluzili svoje mesto na forumu, pisite ovde sve one beskorisne programcice koje ste pisali, nebitno u kom programskom jeziku, da se sprdamo malo\n\a");
}
}

Ето, надам се да сте разумели концепт теме. Без спема. Ако пишете глупости, пишите их у неком програмском језику.

· · · · · ·
SA

banic, pa ovo je standardan zadatak koji se daje kada se rade klase, izvodjenje i polimorfizam. To ili sah tj. Sta ja znam, nista komlikovano, samo mnogo kuckanja. Moze i C sigurno, ali treba se ne izgubiti u C kodu za ovo.

PU
Citat:а HTML програмери

Pade ti na dno dijagrama ovim lapsusom :P

Citat:Sta ja znam, nista komlikovano, samo mnogo kuckanja.

+1

EDIT:
Šta je "wart", as in

Citat:both have their own warts
ZE

Znam da se programiranje u Ekselu ne može nazvati pravim programiranjem, ali može biti itekako upotrebljivo i zabavno. Evo jednog od kodova koji radi posao u mojoj firmi (još da mi adekvatno plaćaju za ovakve stvari... :) ). Kod se nalazi unutar Visual Basic forme koja deluje kao progress bar da se operater-korisnik ne bi ostavio na "čekanju". Nakon odrađenog posla, korisniku se pojavljuje random definicija sa Vukajlije.... :)

Option Explicit

Private Sub TextBox1_Change()

End Sub

Private Sub UserForm_Activate()
Application.Cursor = xlWait
ProgressBar.MousePointer = fmMousePointerHourGlass
DoEvents
Call PokreniProgressBar
Application.Cursor = xlDefault
Unload Me
End Sub
Private Sub UserForm_Initialize()
Call FormatUserForm(Me.Caption)
TextBox2.Left = TextBox1.Left
TextBox2.Top = TextBox1.Top + 3
TextBox2.Width = 0
End Sub
Sub PokreniProgressBar()
Dim sifra As String

sifra = InputBox("Unesi šifru:", "Za pokretanje brze kategorizacije morate uneti šifru")
If sifra = "lol" Then

On Error Resume Next
Dim mediji(100000) As String
Dim podaci(600000) As String
Dim i As Double
Dim j As Double
Dim n As Double
Dim m As Double
Dim brMedija As Integer

n = 1
m = 1
Dim proc As Variant
Dim s As Integer

Dim aktivniWorkbook As String
aktivniWorkbook = ActiveWorkbook.Name
Workbooks.Open FileName:="\\BOB\zajednichki\pomoćni\BAZA MEDIJA.xls"

Workbooks(aktivniWorkbook).Activate
Application.ScreenUpdating = True

Do While Workbooks("BAZA MEDIJA.xls").Worksheets("lista medija").Cells(n, 1) <> ""
mediji(n) = Workbooks("BAZA MEDIJA.xls").Worksheets("lista medija").Cells(n, 1)
n = n + 1
Loop
ActiveSheet.Cells(1, 4) = "Naziv medija"
ActiveSheet.Cells(1, 3) = "Kategorija medija"
ActiveSheet.Cells(1, 2) = "Vrsta medija"
Do While ActiveSheet.Cells(m, 4) <> ""
podaci(m) = ActiveSheet.Cells(m, 4)
m = m + 1
Loop
i = 1
j = 1
brMedija = n - 1
proc = brMedija / 100
For i = 1 To n - 1
If (i proc / brMedija) 100 > proc * s Then
s = s + 1
ProgressBar.TextBox2.Width = s * 2
'Else
'ProgressBar.TextBox2.Width = ProgressBar.TextBox2.Width
End If

For j = 1 To m - 1
If mediji(i) = podaci(j) Then
ActiveSheet.Cells(j, 3) = Workbooks("BAZA MEDIJA.xls").Worksheets("lista medija").Cells(i, 2)
ActiveSheet.Cells(j, 2) = Workbooks("BAZA MEDIJA.xls").Worksheets("lista medija").Cells(i, 5)
'ProgressBar.Label2.Caption = "Izračunavam sve podatke: " & " of " & i
DoEvents
ProgressBar.TextBox2.Width = s * 2
ProgressBar.Label1.Caption = "Obrađeno : " & s & " %"
End If
Next j
Next i
Unload Me
Dim p As Integer
p = Workbooks("SPAS.xls").Worksheets("Rand_Def_Vukajlija").Cells(1, 8)
MsgBox Workbooks("SPAS.xls").Worksheets("Rand_Def_Vukajlija").Cells((Int((p * Rnd) + 1)), 1)
Else:
MsgBox "Šifra koju ste uneli nije tačna. Žao mi je, pokušajte ponovo!"
Exit Sub
Unload Me
End If
End Sub

SG

Zna li neko neku dobru stranicu sa dobrim zadacima za vjezbanje logike.Do nedavno sam radio na z-trening ali njga više nema.

SG

#include<iostream>
#define a (vukajlijaš koji je ovo vidio)
#define b (vukajlijaš koji zna neki sajt sa zadacima sa nekog takmicenje)
using namespace std;
int main()
{
char poruka[]="Molima vas posaljit mi tu stranicu ili zadatke";
if(a==b)
cout<<poruka<<endl;
system("PAUSE");
}

XP

Imao sam do pre mesec, dva ovakav opis profila:
#include <iostream>

int main()
{
do
{
wakeUp();
eat("breakfast");
work();
eat("lunch");
work();
goHome();
eat("dinner");
drinkBeer(rand()%5 + 1);
goToSleep();
}while(1)
return 0;
}

ME

Програмери, јел волите да изучавате ''егзотичне'' језике?

Ево предлога: програмски језик Brainfuck (Brainf##k, BF). У потпуности оправдава свој назив, обзиром да је ''маневарски простор'' изузетно минималистички: компајлер препознаје само 8 инструкција, представљених карактерима унутар наводника '' [] + - . , '', све дуго игнорише. Пријатељско окружење, нема шта, за ово је и асемблер беба :Д

Ради се директно са меморијским ћелијама од 1 бајта. Све што вам је на располагању је поље од 30000 секвенционалних мем. ћелија и поинтер. Све што је у ћелији компајлер третира као ASCII код.

Ево једног простог примера:

Citat:>>>>+++++++++++otvorena_uglasta<++++++++<++++++<+++++++<+++
>>>>-zatvorena_uglasta<<<--.>-.+++.<<-.>-.>---.<<.>>>----.<.<+++.++.<.>>.
<<.>.-.+.<.>--.>++++.-.<---.>>+.-.<<-.++++.

Овај део кода штампа стринг

Citat:KAD JA TAMO A ONO MEDJUTIM

Морао сам да импровизујем тако да тамо где пише ''затворена/отворена угласта'' иде један од ] [
Кажу да је Тјуринг комплит, тако да може много тога сложенијег да се одради, али то већ прелази у домен мазохиста. Већ за нешто, у хај-левл језицима тривијално, типа рачунање н-тог члана Фибоначијевог низа треба доооста скила и времена.

Јес' да вам знање Брејнфака никад неће требати за практичну примену, али, ето, добар је за разоноду и развијање вијуга.
Тејк д челенџ!

SG
Citat:menijesamodosadno

Bratac de ti mene reci imaš li ti kakvih zadataka za razvijanje vijuga...da ih malu u cpp-u razgibavam...isti qrac...vijuge možeš svugdje peglat...a koji će mi ako ga ne mogu prakrtično...

ME

брате, у ц++ можеш да веџбаш шта ти год падне на памет јебем га. јел мора учитељица да зада домаћи да би ти радио?

али ево ти, на! паде ми на памет ово:
http://en.wikipedia.org/wiki/Shunting-yard_algorithm

превођење математичког израза из инфикс у постфикс нотацију.
имплементирај и дај да оценим лоло

едит: мада ти за ово не требају ни вијуге ни мозак, алгоритам је буквално нацртан

· · · · · ·
HS

Fekalna inkontinencija

Fekalna inkontinencija predstavlja vrlo ozbiljno stanje koje pogođenu osobu prvenstveno dovodi u poziciju teške fizičke invalidnosti, a s druge strane vuče za sobom brojne psihičke traume, kao što je gubitak samopouzdanja. Procjenjuje se da je fekalna inkontinencija drugi vodeći razlog koji pacijente dovodi u poziciju da su trajno ovisni o azilu u domovima za zbrinjavanje nemoćnih osoba.

Pod definicijom fekalne inkontinencije podrazumijeva se povremena ili trajna nemogućnost zadržavanja stolice (>10 mL) u trajanju od najmanje mjesec dana kod osoba starijih od tri godine.
Zadržavanje stolice ovisi o brojnim čimbenicima kao što su mentalno zdravlje, konzistencija i volumen stolice, motilitet crijeva, rastezljivost rektuma, funkcija analnog sfinktera, inervacija tkiva i organa oko završnog dijela rektuma uključujući i anorektalne reflekse. Anatomska barijera koja osigurava kontinenciju stolice je stijenka završnog rektuma, te unutarnji i vanjski analni sfinkter i puborektalni potporni mišići.
Procesi koji mogu dovesti do inkontinencije stolice:
- Disfunkcija analnih sfinktera
- smanjeni tonus sfinktera zbog traume u području anusa bilo akcidentalno pri porođaju ili kasnije, te oparativnih zahvata kao što su operacija analnih fistula, hemoroida.
- infiltrativni procesi (primarni i sekundarni maligni tumori)
- vaginalni porod može dovesti do inkontinencije odmah ili godinama nakon poroda

Smanjena propustljivost rektuma. Normalno završni dio ravnog crijeva (rektum) zadržava oko 300 mL stolice bez nagona za defekacijom. U stanjima smanjene propustljivosti rektuma pokreće se refleks defekacije i na minimalne količine stolice u ampuli rektuma. Najčešće se tada radi o upalnim bolestima crijeva (ulcerozni kolitis i kolitis povezan s Crohnovom bolešću) te postiradijacijskom kolitisu (kolitisi nakon zračenja zbog malignih tumora u maloj zdjelici).
Poremećena osjetljivost rektuma u bolestima kao što su diabetes mellitus, multipla skleroza, demencija, povrede produžene moždine.
Impakcija stolice u ampuli rektuma je vrlo čest razlog inkontinencije kod starijih osoba. Radi se o „zaglavljenom" komadu tvrde stolice u ampuli rektuma koji trajno relaksira unutarnji analni sfinker i time dovodi do trajnog propuštanja tekuće stolice.

Procjena pacijenata s fekalnom inkontinencijom počinje iscrpnim razgovorom te dobrim kliničkim internističkim, baš kao i neurološkim pregledom. Digitorektalni pregled je vrlo važna i lako izvodljiva pretraga koja nam daje dobar uvid u stanje sfinktera i eventualnu infiltraciju stijenke rektuma, a izvodjiva je već u ordinaciji liječnika opće prakse. Od daljnjih dijagnostičkih procedura najvažnije su rektosigmoidoskopija, anorektalna manometrija, transrektalni ultrazvuk, elektromiografija sfinktera.

Formiranu stolicu je lakše kontrolirati nego tekuću, stoga je pametno inicijalno započeti terapiju dijetom preparatima koji vežu vodu na sebe i utječu na formiranje stolice (metilceluloza)
Lijekovi koji smanjuju motilitet stolice i podižu tonus analnog sfinktera (loperamid).
Kod pacijenata s impaktiranom stolicom, jednostavnim zahvatom se i digitorektalno može evakuirati zaostali komadi stolice te efektno riješiti inkontinencija.
Električna stimulacija korijena sakralnih živaca može dovesti do oporavka kod pacijenata s intaktim sfinkterom.
Analna električna stimulacija podrazumijeva dnevnu stimulaciju korištenjem analne elektrode i može se koristiti samostalno kod kuće nakon edukacije u adekvatnoj ustanovi.

„Biofeedback"-terapija
„Biofeedback"-terapija predstavlja bezbolnu, neinvazivnu tehniku gdje pacijente učimo da kontroliraju određene tjelesne procese koji nisu pod kontrolom naše volje, kao što je ritam rada srca, tonus glatkih mišića, temperatura. Ove aktivnosti se mogu registrirati elektrodama i bilježiti, odnosno evaluirati na monitoru.
Jedna od indikacija za ovu tehniku je i fekalna inkontinencija, koja se provodi uglavnom u devet navrata u trajanju od 40 do 60 minuta, pod kontrolom obučene medicinske sestre u periodu od tri do šest mjeseci.

Kirurška terapija
Korisnik jednostavnim postupkom stiskanja kontrolne pumpe dozvoljava defekaciju.
Kirurška terapija uključuje parcijalno obnavljanje sfinktera ili podizanje stražnjeg dijela sfinktera. Novije mogućnosti su implantacija arteficijalnog sfinktera. Radi se o manžeti koja se ugrađuje oko analnog kanala, a kontrolna pumpa za manuelnu regulaciju tonusa u skrotum ili labija vagine.
Korisnik jednostavnim postupkom stiskanja kontrolne pumpe dozvoljava defekaciju. Alternativa ovim postupcima je injekcija biomaterijala u unutranji analni sfinkter (silikon, kolagen) u cilju pojačanja tonusa mišića. Ovi postupci su još u fazi ispitivanja učinkovitosti, te nisu za širu upotrebu.

SO

Hogar_Strašni™
Fekalna inkontinencija
Fekalna inkontinencija predstavlja vrlo ozbiljno stanje koje pogođenu osobu prvenstveno dovodi u poziciju teške fizičke invalidnosti, a s druge strane vuče za sobom brojne psihičke traume, kao što je gubitak samopouzdanja. Procjenjuje se da je fekalna inkontinencija drugi vodeći razlog koji pacijente dovodi u poziciju da su trajno ovisni o azilu u domovima za zbrinjavanje nemoćnih osoba.
Pod definicijom fekalne inkontinencije podrazumijeva se povremena ili trajna nemogućnost zadržavanja stolice (>10 mL) u trajanju od najmanje mjesec dana kod osoba starijih od tri godine.
Zadržavanje stolice ovisi o brojnim čimbenicima kao što su mentalno zdravlje, konzistencija i volumen stolice, motilitet crijeva, rastezljivost rektuma, funkcija analnog sfinktera, inervacija tkiva i organa oko završnog dijela rektuma uključujući i anorektalne reflekse. Anatomska barijera koja osigurava kontinenciju stolice je stijenka završnog rektuma, te unutarnji i vanjski analni sfinkter i puborektalni potporni mišići.
Procesi koji mogu dovesti do inkontinencije stolice:
- Disfunkcija analnih sfinktera
- smanjeni tonus sfinktera zbog traume u području anusa bilo akcidentalno pri porođaju ili kasnije, te oparativnih zahvata kao što su operacija analnih fistula, hemoroida.
- infiltrativni procesi (primarni i sekundarni maligni tumori)
- vaginalni porod može dovesti do inkontinencije odmah ili godinama nakon poroda
Smanjena propustljivost rektuma. Normalno završni dio ravnog crijeva (rektum) zadržava oko 300 mL stolice bez nagona za defekacijom. U stanjima smanjene propustljivosti rektuma pokreće se refleks defekacije i na minimalne količine stolice u ampuli rektuma. Najčešće se tada radi o upalnim bolestima crijeva (ulcerozni kolitis i kolitis povezan s Crohnovom bolešću) te postiradijacijskom kolitisu (kolitisi nakon zračenja zbog malignih tumora u maloj zdjelici).
Poremećena osjetljivost rektuma u bolestima kao što su diabetes mellitus, multipla skleroza, demencija, povrede produžene moždine.
Impakcija stolice u ampuli rektuma je vrlo čest razlog inkontinencije kod starijih osoba. Radi se o „zaglavljenom" komadu tvrde stolice u ampuli rektuma koji trajno relaksira unutarnji analni sfinker i time dovodi do trajnog propuštanja tekuće stolice.
Procjena pacijenata s fekalnom inkontinencijom počinje iscrpnim razgovorom te dobrim kliničkim internističkim, baš kao i neurološkim pregledom. Digitorektalni pregled je vrlo važna i lako izvodljiva pretraga koja nam daje dobar uvid u stanje sfinktera i eventualnu infiltraciju stijenke rektuma, a izvodjiva je već u ordinaciji liječnika opće prakse. Od daljnjih dijagnostičkih procedura najvažnije su rektosigmoidoskopija, anorektalna manometrija, transrektalni ultrazvuk, elektromiografija sfinktera.
Formiranu stolicu je lakše kontrolirati nego tekuću, stoga je pametno inicijalno započeti terapiju dijetom preparatima koji vežu vodu na sebe i utječu na formiranje stolice (metilceluloza)
Lijekovi koji smanjuju motilitet stolice i podižu tonus analnog sfinktera (loperamid).
Kod pacijenata s impaktiranom stolicom, jednostavnim zahvatom se i digitorektalno može evakuirati zaostali komadi stolice te efektno riješiti inkontinencija.
Električna stimulacija korijena sakralnih živaca može dovesti do oporavka kod pacijenata s intaktim sfinkterom.
Analna električna stimulacija podrazumijeva dnevnu stimulaciju korištenjem analne elektrode i može se koristiti samostalno kod kuće nakon edukacije u adekvatnoj ustanovi.
„Biofeedback"-terapija
„Biofeedback"-terapija predstavlja bezbolnu, neinvazivnu tehniku gdje pacijente učimo da kontroliraju određene tjelesne procese koji nisu pod kontrolom naše volje, kao što je ritam rada srca, tonus glatkih mišića, temperatura. Ove aktivnosti se mogu registrirati elektrodama i bilježiti, odnosno evaluirati na monitoru.
Jedna od indikacija za ovu tehniku je i fekalna inkontinencija, koja se provodi uglavnom u devet navrata u trajanju od 40 do 60 minuta, pod kontrolom obučene medicinske sestre u periodu od tri do šest mjeseci.
Kirurška terapija
Korisnik jednostavnim postupkom stiskanja kontrolne pumpe dozvoljava defekaciju.
Kirurška terapija uključuje parcijalno obnavljanje sfinktera ili podizanje stražnjeg dijela sfinktera. Novije mogućnosti su implantacija arteficijalnog sfinktera. Radi se o manžeti koja se ugrađuje oko analnog kanala, a kontrolna pumpa za manuelnu regulaciju tonusa u skrotum ili labija vagine.
Korisnik jednostavnim postupkom stiskanja kontrolne pumpe dozvoljava defekaciju. Alternativa ovim postupcima je injekcija biomaterijala u unutranji analni sfinkter (silikon, kolagen) u cilju pojačanja tonusa mišića. Ovi postupci su još u fazi ispitivanja učinkovitosti, te nisu za širu upotrebu.

EI

Napisati potprogramsku proceduru koja od datog niza X koji ima k elemenata koji se sastoji od celih, nenegativnih brojeva, pravi nov niz Y koji predstavlja indekse onih elemenata niza X kod kojih je ispunjen tačno jedan od uslova: ili su deljivi brojem 2 ili su deljivi brojem 3. (Primer: X: 3, 152, 23, 26, 49, 77, 51, 44, 32, 72, k=10, Y: 1, 2, 4, 7, 8, 9, l=6)
Kreirati proceduru događaja koja odgovara komandnom dugmetu “START” koja sa ekranskog obrasca “ISPIT” iz TextBox-ova učitava prirodne brojeve m i n, , a zatim iz datoteke Ulaz.txt celobrojnu nenegativnu matricu Amxn. U svakom redu datoteke, počev od desetog reda, upisana je po jedna vrsta matrice, pri čemu svaki element matrice zauzima 6 mesta. Matrica se smatra ispravnom ako je aritmetička sredina elemenata koji se nalaze u prvoj vrsti manja od elementa koji se nalazi u preseku m-te vrste i n-te kolone. Ako je matrica A ispravna, pozivati gornju potprogramsku proceduru za svaku njenu kolonu. Nizove koje vrati potprogramska procedura smatrati kolonama nove matrice B. Kolone koje imaju manje od m elemenata dopuniti nulama odozdo. Matrice A i B odštampati na ekranskom obrascu i u datoteci Izlaz.txt. Ako matrica A nije ispravna, na ekranskom obrascu prikazati odgovarajuću poruku.

visual basic je u pitanju, noobčina sam za ovo, ako mi neko odradi ima odmene pivo

EDIT: ako neko uradi, ne mora da mi linkuje root folder za tekst fajlove,samo nek napise za izvor ulaz.txt i izlaz.txt

RA

Početak
X
π= deljivi sa 2
^
START
Naziv "imendan"
ISPIT
Y
BEGIN
IF
END IF
END

IZVOR: ULAZ.TX

Mislim, odma da te pripremim, neće ti niko ovo uraditi iz korena do kraja, pogotovu ne u jebenom vižual bejziku, nego reci ako ti treba nešto konkretno, tipa, "kako treba da izgleda ovaj procedura što pravi nov niz", "kako da napišem proveru da li je matrica validna", a ovo sa dugmićima, za to možeš DA GA PODOJIŠ

РК

pa ne znam u vb-u da ti napišem, a sad vidim da baš ne znaš ništa, pa džabe da ti pišem u nekom drugom jeziku

ja sam mislio da imaš neko konkretno pitanje, tipa "kako da proverim da li je broj deljiv sa 2, a sa 3 ne"

CC

To je bio predrok. Ko uradi ne mora da radi ispit. ALI MORA DA ODBRANI!

Pita te šta je ovo, a ti vičeš REKURZIJA!

EI

ma ovo je zajebancija bila da se uradi ne znam što sam uopšte pitao ovde kad znam da niko ne obitava sem pičketina koje bacaju skečeve

pišam po programerskom kutku i po programiranju, i pre svega po temi kladionica

Prijavi se na vukajlija.com da bi odgovorio.Prijavi se