Hirdetés
- Ha nem növelnéd feleslegesen a villanyszámlád, a Chieftecnek van pár új ajánlata
- ARC vs eARC — Ilyet is tud a HDMI-d? 🤨
- A következő évtizedbe repíti a NAND hatékonyságát a Samsung új kutatása
- ASUS blog: kisebb, de nem gyengébb – a mini PC-k forradalma
- 5 kilowattos GPU-k előtt nyitná meg az utat az Intel
- Meghalt a Windows 10, éljen a Windows 10!
- Apple asztali gépek
- Kormányok / autós szimulátorok topikja
- Androidos fejegységek
- M.2 csatlakozók terén (is) jónak ígérkezik az MSI közelgő AMD-s alaplapja
- Gaming notebook topik
- Projektor topic
- Azonnali alaplapos kérdések órája
- Milyen monitort vegyek?
- Plazma TV topic
-
PROHARDVER!

Új hozzászólás Aktív témák
-
9CS
senior tag
Ötletek:
1.: Kell három int változó: osszeg, darab, be. Írsz egy hátul tesztelő ciklust, amiben az a feltétel, hogy osszeg < 10000. A ciklus előtt a változókat nullázd. (Fontos, hogy előtte.) Ebben a ciklusban: Fogsz egy bekérést, ezt beteszed a „be” változóba, ezt ellenőrzöd, hogy szám e. (szorgalom függvényében, hogy ez egész). Az „osszeg” változót úgy módosítod, hogy az legyen egyenlő az „osszeg” + „be”. A ''darab''-hoz hozzáadsz 1-et. A ciklus után elhelyezed a kiírásokat. ''osszeg'', és ''darab'', a megfelelő körítéssel, melyik-melyik, hogy szép legyen.
2.: Itt az a „trükk” talán, hogy két dolgot kell ellenőrizni, egyik, ha „.”-ot tesz az ember, az a ciklus kilépése, a „szóköz”-ök száma +1, pedig megadja, hány szó van a mondatban. A billentyűket ACSII kódjuk ([link]) alapján tudod megnézni, melyik-melyik. Vagy egy karakterként „” között. („.” „ „)
Olvasnivalók: [link], [link]. -
9CS
senior tag
Nem tudja Valaki, hogy a Visual C++ webBrowser-ét hogy lehet rávenni arra, hogy egy richTextBox Text-et jelenítsen meg? Vagy mi lenne a legegyszerűbb módszer arra, hogy a programon belül szerkezzek egy weblapot, és azt utána meg tudjam nézni, szintén a programomon belül? Előre is köszönöm.
-
9CS
senior tag
Lehetséges PHP-nak programból küldeni olyan értékeket amiket egyébként post-al kéne megkapnia? Visual C++ 2005-öt öt kezdtem el nézegetni és akadt is, egy jó tanuló feladat, viszont a PHP-vel csak egy kicsi foglalkoztam eddig és az MS C++ is teljesen új nekem. Olyasmire gondolok, mint itt a PH belépés, csak programból. Azért lenne fontos hogy ne az oldalon kelljen belépni, mert utána pár automatikus műveletet kéne csinálnia a kis proginak, de nem nagyon tudok elindulni. Látom van browser komponens, de nem tudom, hogy kéne rávenni, hogy elküldje a megfelelő értékeket a PHP-nak. Miként megy el a PHP-nak a post? Lehet ezt elküldeni neki egyben, mint itt a PH!- a listázás például? (http://prohardver.hu/f.php?mod=40&id=6192) Működne ez bejelentkezéssel is?
Előre is köszönöm az útmutató segítségeket. Remélem sikerült érthetően leírni mire is gondoltam. -
9CS
senior tag
válasz
#16741888
#824
üzenetére
A számok ASCII kódját figyelve kérdd be a számokat. Mivel ezek sorban vannak, be lehet határolni, hogy mi az amiket hozzá lehet adni ahhoz a változóhoz, ami az eddig beírt számokat tárolja. Kell hozzá egy másik változó ami csak a darabszámot tárolja. Az egész elé teszel egy feltételt, ha nem a ''-'' jelet érzi addig fusson. A ''-'' ra gyors számolás, és kiíratás.
-
9CS
senior tag
Na jó, de egy kezdő a C-ben, C++-ban sem lát semmi pluszt, mert azt sem tudja hol van, így fokozatosan megismeri a mind több és több trükköt. Nem kell egyből mindent használni, nem?
KPepe: nem szimplán a kinézete nem tetszik, hanem az elv, hogy: „ez tanuló nyelv, kell ez nektek jó ez…”
No de legyen béke, mindenki azt használ amit akar. Tanítani meg azt tanítanak, amit a tanár akar.
-
9CS
senior tag
Egyetértek azzal, amit írsz. De nekem jobban ment a C. Mondjuk én ilyen OKJs programozás oktatáson tanultam, ott az volt, hogy első évben Pascal, aztán köv év C, C++, Builder gyors egymás után. Nem volt előtte semmilyen programozói gyakorlatom, így amit tanultam, azt ott szedtem fel. Viszont a Pascal nem ment, ott csak vergődtem, míg a C-s „korszakban” elkezdett tetszeni a dolog, és egyre jobban ment. Ezért érthetetlen nekem, ez a Pascal jó tanuló nyelv, mert lehet nem mindenkinek. Nekem például nem feküdt, míg a C igen, pedig mindkettőben 0 tapasztalatom volt. Ezek után gondolom én így, hogy nem kell nekem a Pascal jó tanuló nyelv(e), mert (nekem) nem az. Itt írjátok a szép kis C kódokat, mi a baj vele? Tök jól olvasható.
Természetesen kell, hogy ismerjen egy programozó több nyelvet (bár talán nem halálos, ha egyben profi), de akkor ne már egy „tanulónyelv” legyen az, amivel terheli magát. Van jobb lehetőség is, a további fejlődésre.
Én is kevertem a Pascalt a C-ben, de csak a nyelvkavarodás miatt, nem azért, mert ez jó móka. Persze olyan durván, hogy utána mér le sem fordult. Bár már kinőttem. Lehet ez a másik oka, hogy gyűlölöm a Pascalt. Bár PHP kódot sosem szőttem a C-be. -
9CS
senior tag
Itt írod Te is mi az igazi gond vele: ''Pascalnak egy területen van igazi jelentősége, és ez az oktatás.'' De minek egy nyelvet oktatásra fenntartani? Ez a tanulónyelv szerintem fölösleges plusz teher és kavarodás forrása lehet. Legalábbis engem zavart a nyelvváltás. Minek megtanulni olyat, aminek utána semmi haszna nincs? Az elmélet nyelv független, utána meg már tanuljon az ember olyan nyelven kódolni, amit használni is lehet. Szerintem.
-
9CS
senior tag
válasz
Dominator
#703
üzenetére
Ha jót akarsz Magadnak, akkor csak az egyiket kezded el tanulni. A másikat mindaddig kerülöd, míg nem vagy gyakorlott az elsőben. (Utána meg már nem fog kelleni
) Egyébként meg a programozás igen kis része (bár mindenképpen nagyon fontos) a kódolás, ha meg tudod tervezni és elgondolni, mit is kéne pontosan csinálnia a programnak, akkor a többi már csak idő kérdése. Én a helyedben a C-vel kezdenék, vagy egyből C++. Én szerencsére ellenálltam a TP oktatásnak, és már kezdem felejteni azt is, ami megragadt. Szégyen, hogy ezt még tanítják. Persze, ha Delphi fanatikus Valaki, akkor ok. -
9CS
senior tag
UP a forumnak, meg aki kényelmes, annak: Bővebben: link
-
9CS
senior tag
Erre ötlet esetleg?: Bővebben: link
[Szerkesztve] -
9CS
senior tag
Két problémám lenne. Builder 6-ban MySQL adatbázist szeretnék kezelni. Egyik gond, hogy a sima DBGrid-ben a blob típusú mezőknek az értékét nem lehet látni, csak az jelenik meg, hogy (BLOB) így zárójelezve. Mit lehetne ez ellen tenni? ODBC vezérlőn keresztül kommunikál a program az adatbázissal. TDatabase TTable és TDataSource van csak feltéve a form-ra, no meg a DBGrid. Hogy lehetne elérni, hogy a blolb tartalmát is kiírja. Ehhez csatlakozik a másik gond, a blob a kódolt szövegrészeket tárolja, érdemes lenne kicserélni ezt más típusra, hogy ne legyen ez a gond? A blob-ot tanácsolták, hogy kódolt szöveget ilyen típusban tároljam.
-
9CS
senior tag
válasz
KovacsUr
#218
üzenetére
Nos?
A feladatleírás még ide:
''80 lény: max 20 évet élnek. Halálozásuk valószínűsége egyenesen arányos
korukkal, pl.: a 0 éves biztosan 1 éves lesz, a 10 éves 1/2 eséllyel
éri meg a következő évet. A 20 éves biztosan meghal.
Feladat: Kezdetben az összes lény 0 éves (újszülött). Ezután folyamatosan
válasszunk ki véletlenszerűen egy lényt. Aztán probáljuk meg növelni az
életkorát a megfelelő eséllyel. Ha meghal azonnal megjelenik egy újszülött.
A 80 lény korát oszlopdiagrammként folyamatosan ábrázoljuk a képernyőn és
írjuk ki az átlagéletkorukat is. Gobnyomásra a program érjen véget.''
Az én szavaimmal. és kb. -
9CS
senior tag
Oh ez valószinű moderálva lesz, de akkor nézzük:
Kivettem pár ellenörző sort ami nem kell igazaból, csak próbálkoztam megkeresni velük a hibát... Remélem hasznos sort nem vágtam ki
.
Program max20ev;
Uses crt;
Var
falka : array[1..80] of byte;
o, {kiválasztott elem}
e, {évek száma}
t {a falka 0-val való feltöltéséhez kell}
: byte;
osszeg {átlag korhoz}
:word;
atl {az átlag}
: real;
{ --- Procedurák --- }
Procedure Kivalasztas; {Egy véletlen szám}
Var {1-80-ig}
v : byte;
Begin
Randomize;
v := Random(80)+1;
o := v;
end;
Procedure Oregites; {No ez igen
}
Var x : integer; {Öregít elvileg}
v : byte;
Begin
{readln(e);}
x := round(100-e*(100/20));
{writeln('ez a ''%'': ',x);}
Begin
Randomize;
v := Random(100);
{WriteLn('ez a random szám a vénséghez: ',o);}
Begin
if v<=x then e:=e+1
else e:=0;
{writeln('öregedés utáni kor: ',e);}
end;
end;
end;
Procedure Hanyeves; {Megnézi mennyi idős}
{Var} {Ha a két kritikus}
{e : byte;} {kor akkor lekezeli}
begin {Nem szükséges!}
{read(e);} {elvileg}
if e=0 then e:=1 {elég az öregítés}
else
if e=20 then e:=0
else oregites;
end;
Procedure Lentivonal; {Egy vonal lent}
Var i : byte;
begin
gotoxy(1,24);
for i:=1 to 80 do
write(chr(178));
End;
Procedure oszloptorol; {Oszlopok törlése}
Var i,k : byte;
Begin {Kezdő pont}
k := 23;
for i:=1 to 20 do
gotoxy(o,k);
write(' ');
k:=k-1;
{readkey;}
End;
Procedure Egyoszlop; {Oszlopok huzása}
Var i,k : byte;
Begin {Kezdő pont}
k := 23;
for i:=1 to e do
gotoxy(o,k);
write(chr(178));
k:=k-1;
{readkey;}
End;
Procedure Atlagkor; {Átlag életkor}
Begin
atl:=0;
atl:=(osszeg/80);
End;
{ --- Kezdődjék hát a program --- Változók az elején! --- }
Begin
clrscr;
lentivonal;
for t:= 1 to 80 do
falka[t]:=0;
osszeg:=0;
Repeat
Kivalasztas;
e:=falka[o];
osszeg:=osszeg-e;
hanyeves;
oregites;
falka[o]:=e;
osszeg:=osszeg+e;
atlagkor;
readln(e);}
oszloptorol;
egyoszlop;
gotoxy(30,3);
write('Átlag kor: ',atl);
Until keypressed;
End. -
9CS
senior tag
Mennyire lehet pofátlan kérdése az embernek?
Ugyanis sajna a házimmal komoly gondok vannak. Nem működik a kijelzés, ha bemásolm a forrást esetleg lenne Aki megnézi, hol lehet a baj? Ma mutattam a tanárnak, hogy a számolás mintha jó lenne (kivéve átlag számítás
),csak a kijelző nem igazán azt csinálja mint kéne. Külön ha csak az a rész megy akkor jó... Mondta keresem meg a hibát, de nem lelem
Szóval szabad ide biggyeszteni ''pár'' sorocskát? Néhány képernyönyi Pascal forrás lenne. Ha van aki jelentkezik, hogy rápillant akkor beteszem nemsokára, csak most floppyn van, az meg a gépemben nincs. -
9CS
senior tag
A forrás keresgélés közben találtam ezt: egy kis ''játék'' az ügyesebb programozóknak:
http://www.brody-ajka.sulinet.hu/pldtar/program/f/10.htm -
9CS
senior tag
Valaki tudna mondani olyan magyar oldalt ahol vannak Tubo Pascal források? Fontos lenne, hogy magyarázatok is legyenek a forrásban (vagy megjegyzések tömkelege), olyasmi mint az alap példákban. Előre is köszönöm.
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- RYZEN 7 7800X3D 32 GB DDR5 RTX 3080 Ti 12GB 1TB M.2
- Lenovo ThinkPad P15 Gen 1 Tervező Vágó Laptop -50% 15,6" i7-10750H 32/512 QUADRO T1000 4GB
- Dell LAtitude 7490 FHD, TOUCH, i7-8565U CPU, 16GB DDR4, 512GB SSD, 27% ÁFÁS SZÁMLA, 1ÉV GARANCIA!
- Üzletből, Lenovo garanciával ThinkPad E14 Gen 5/ Intel Core i5-1335u/16GRAM/512SSD/FULL HD +kijelző
- HP Elitebook 840 G6 FHD, i7-8565U CPU, 16GB DDR4, 512GB SSD, 27% ÁFÁS SZÁMLA, 1ÉV GARANCIA!
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max
- Samsung Galaxy A36 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia / BONTATLAN
- Samsung Galaxy A16 / 4/128GB / Kártyafüggetlen / 12Hó Garancia
- Bomba ár! HP ProBook 640 G4 - i5-8GEN I 8GB I 256GB SSD I 14" FHD I Cam I W11 I Garancia!
- 2db x Green Cell UPS 2000VA 1200W teljesítményálló tartalék tápegység 2000VA 1200W
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: ATW Internet Kft.
Város: Budapest


) Egyébként meg a programozás igen kis része (bár mindenképpen nagyon fontos) a kódolás, ha meg tudod tervezni és elgondolni, mit is kéne pontosan csinálnia a programnak, akkor a többi már csak idő kérdése. Én a helyedben a C-vel kezdenék, vagy egyből C++. Én szerencsére ellenálltam a TP oktatásnak, és már kezdem felejteni azt is, ami megragadt. Szégyen, hogy ezt még tanítják. Persze, ha Delphi fanatikus Valaki, akkor ok.

Köszi szépen, amint van időm, áttanulmányozom. Mindenesetre rövid kis program lett az én kuszaságomhoz képest.
Ugyanis sajna a házimmal komoly gondok vannak. Nem működik a kijelzés, ha bemásolm a forrást esetleg lenne Aki megnézi, hol lehet a baj? Ma mutattam a tanárnak, hogy a számolás mintha jó lenne (kivéve átlag számítás
),csak a kijelző nem igazán azt csinálja mint kéne. Külön ha csak az a rész megy akkor jó... Mondta keresem meg a hibát, de nem lelem


