- Xiaomi 13 Pro - szerencsés szám
- Android alkalmazások - szoftver kibeszélő topik
- Magisk
- Nothing Phone (3a) és (3a) Pro - az ügyes meg sasszemű
- Samsung Galaxy Watch4 és Watch4 Classic - próbawearzió
- Bemutatkozott a Fairphone 6
- Megérkezett a Google Pixel 7 és 7 Pro
- Megjelent a Poco F7, eurós ára is van már
- Milyen okostelefont vegyek?
- A Galaxy Z Fold7, minden színben és oldalról
Új hozzászólás Aktív témák
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2635 üzenetére
nem sok.
a turbo és a borland szinte ugyan az. a borland pascal tartalmazza a win32 programozáshoz szükséges dolgokat is. a nyelv szempontjából teljesen egyforma a TP és BP.
A free pascal egy szabad szoftver. kompatibilis a borland rendszerekkel, de vannak eltérések. a free pascalnak van dos, win32 és linux változata is.tanulásra mindegyik megfelelő.
-
aAron_
őstag
válasz
Mr. Erikszon #2630 üzenetére
egyébként vannak a neten nagyon jó oldalak pascal-hoz, kis túlzással pár óra alatt meg lehet tanulni az egészet. elég egyszerű a nyelv. http://www.prog.ide.sk/pas.php, http://videosmart.hu/profile/FlamingClaw
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2630 üzenetére
Hova jársz suliba? Ez valamilyen középiskola?
-
drkbl
őstag
válasz
Mr. Erikszon #2628 üzenetére
- Felbontod vagy az én, vagy az előző módszer szerint 5 változóba a,b,c,d,e ahol a a tízezres (1), .., e az egyes (5)
- A négyjegyű szám a*1.000 + b*100 + d*10 + e
azaz a,b "lecsúszik" rangban, c nem játszik, d,e marad tízes, egyes helyiérték.
-
drkbl
őstag
válasz
Mr. Erikszon #2626 üzenetére
Kérdés, mit jelent a törlés: ötjegyű számból négyjegyű lesz, VAGY az ötjegyű szám középső jegye 0 lesz?
-
drkbl
őstag
válasz
Mr. Erikszon #2623 üzenetére
12345 / 10 = 1234,5 maradék: 5 -> megy az egyeseknek fenntartott változóba
levágással kerekíted 1234
1234 / 10 = 123,4 maradék 4 -> megy tízesnek
levágással kerekíted 123
123 / 10 = 12,3 maradék 3 -> megy százasnak
levágással kerekíted 12
.
.
.
x div y -> eredménye a hányados 0 felé kerekítve (csonkolásos kerekítés)
x mod y -> eredménye a maradéklegalábbis Delphiben
Mod: pastebin-re fel tudod tölteni, amit készítettél?
-
drkbl
őstag
válasz
Mr. Erikszon #2621 üzenetére
Nem bonyolult az, felbontja a számot 1-esekre, 10-esekre, 100-asokra, ...
Aztán ami eredetileg 1000-es volt, az százas lesz, ami 10.000-es, az 1000-es.12345 = 1X10.000 + 2X1.000+3X100+4X10+5X1
1245 = 1X1.000+2X100+4X10+5X11 + 5 + 4 + 1 változó, és akkor debuggerben egyszerűen követhető, mit számol.
Osztod 10-el, a maradék az adott jegy, az eredményt kerekíted, osztod 10-el, ...
Pont mint 10->2 számrendszer konverziónál.
Szerintem.
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2618 üzenetére
meg lehet csinálni egyetlen változóval is (a bekért szám).
Ha olvashatóra akarod írni akkor 7 változót is csinálhatsz....Kérdés hogy mi a cél.
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2616 üzenetére
a "most jön a gubanc" helyére kell beírni azt amit az előbb leírtam.
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2613 üzenetére
A megoldás:
tezres=szam egészosztás 10000
ezres=(szam-tezres) egészosztás 1000)
szazas=(szam-tezres-ezres) egészosztás 100
tizes=(szam-tezres-ezres-szazas) egészosztás 10
egyes=szam-tezres-ezres-szazas
új szám=tezres*1000+ezres*100+tizes*10+egyesEzt kell átírni pascal-ba. Gondolom az azért nem okoz problémát....
Egy kis segítség:
div : egészosztás művelet. Használata itt van leírva. -
bucsupeti
senior tag
válasz
Mr. Erikszon #2613 üzenetére
bemásolnád ide hogy meddig jutottál?
-
bucsupeti
senior tag
válasz
Mr. Erikszon #2610 üzenetére
én meg tudnám oldani, de attól nem fog jobban menni neked az infó. inkább segítenék neked.
meddig jutottál el a problémában? le tudnád írni magyarul hogy hogyan oldanád meg a feladatot?
Új hozzászólás Aktív témák
Hirdetés
- Xiaomi 13 Pro - szerencsés szám
- A Tesla és a Google volt mérnökei AI által írt szövegek után kutatnak
- Futás, futópályák
- Netflix
- Beszántaná a marketingért felelős részlegét az Intel
- One otthoni szolgáltatások (TV, internet, telefon)
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Diablo IV
- Kávé kezdőknek - amatőr koffeinisták anonim klubja
- Formula-1
- További aktív témák...
- ROG Maximus Z790 Dark Hero
- Új MSI KATANA 17 Gamer Tervező Laptop 17,3" -35% i7-13620H 10Mag 16/1TB RTX 4060 8GB FHD 144Hz
- Apple Iphone 13 128gb csillagfény színű OLCSÓN . Csere/beszámítás
- OnePlus Pad 2 + OnePlus Pad 2 billentyűzet + Extrák
- AKCIÓ!!! GAMER PC: Új i5-14400F +RTX 4060/5060/4070/5070 +Új 16-64GB DDR4! GAR/SZÁMLA! 50 FÉLE HÁZ!
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- AKCIÓ! AMD Ryzen 7 3800X 8mag 16szál processzor garanciával hibátlan működéssel
- BESZÁMÍTÁS! ASUS B450 R7 1700X 16GB DDR4 512GB SSD RX 580 8GB Rampage SHIVA Corsair 450W
- Asus Rog Strix G16
- Apple iPhone 12 Pro 256GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest