Hirdetés
Legfrissebb anyagok
LOGOUT témák
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Brogyi: CTEK akkumulátor töltő és másolatai
- laskr99: DFI és DFI Lanparty gyűjteményem
- Magga: PLEX: multimédia az egész lakásban
- eBay-es kütyük kis pénzért
- btz: Internet fejlesztés országosan!
- GoodSpeed: Egy bihari a Hajdúságban
PROHARDVER! témák
Mobilarena témák
IT café témák
Új hozzászólás Aktív témák
-
Gyuri16
senior tag
válasz
Monika19
#1775
üzenetére
ha van egy edited pl Edit, akkor egy valtozoba igy tudod atmasolni (ha szam):
a:=StrToFloat(Edit.text);
ezek utan ha mindent beolvastal, kiszamolod a d-t, aztan jon a rettegett if, kb igy:if d<0 then
eredmenyEdit.Text:='0'
else if d=0 then
eredmenyEdit.Text:='1'
else if d>0 then
eredmenyEdit.Text:='2';ez kiirja az megoldasok szamat az eredmenyEdit editbe
ezutan siman kiirod a d-t:EdDiszkriminans.Text:=FloatToStr(d);
Új hozzászólás Aktív témák
Aktív témák
- Nem indul és mi a baja a gépemnek topik
- Formula-1
- Adobe Lightroom topic
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Óra topik
- Milyen okostelefont vegyek?
- Beköszöntött az űrinternet kora
- Xbox Series X|S
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Linux kezdőknek
- További aktív témák...
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- Veszünk: PS5 Fat/Slim/Digital/Pro konzolt, játékokat, Portalt stb. Kérj ajánlatot!
- HIBÁTLAN iPhone 15 Pro Max 256GB Black Titanium -1 ÉV GARANCIA - Kártyafüggetlen, MS3698
- 155 - Lenovo LOQ (15IRH8) - Intel Core i5-13505H, RTX 4060
- Vadiúj garanciás kèszleten lèvő lapok! Kamatmentes rèszletre is!
- HIBÁTLAN iPhone 15 Pro Max 256GB Black Titanium -1 ÉV GARANCIA - Kártyafüggetlen, MS3497
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Promenade Publishing House Kft.
Város: Budapest

