Aktív témák
-
QuarK
senior tag
Sztem ez rögvest zárva lesz, de nyugodtan tedd fel a kérdést mondjuk a Turbo pascal - elakadtam totyikban, biztos hamar meg lesz válaszolva. Amúgy ha jól sejtem, akkor a pow() c függvényre volna szükséged pascalban...
-
gErYoN
tag
A második kérdést akkor szerintem hagyjuk is!
-
gErYoN
tag
válasz
REAL WORLD #3 üzenetére
Hát most erre mit mondjak? Már megnyitottam! Elnézést akkor mindenkitől, csak én is szerettem volna létrehozni egyet mert sürgős! Na mindegy akkor zárható vagy tudom is én!
-
gErYoN
tag
(Bocsesz hogy ilyen soká írtam, hogy mi a bajom csak kicsit hosszúra sikerült!!)
1., Itten van egy program:
program gyokketto;
{$X+}
uses crt;
var ak,fk,k:real; {ak=alsókorlát, fk=felsőkorlát, k pedig az aktuális szám}
begin
clrscr;
ak:=1;
fk:=2;
k:=(ak+fk)/2;
repeat
if sqr(k)>2 then fk:=k
else ak:=k;
k:=(ak+fk)/2;
until abs(fk-ak)<0.000001;
writeln (k);
readln;
end.
Szal ez gondolom nem olyan nagy szám, de kérdésem, hogy a 0.000001 helyére hogyan lehetne egy bekért számot felhasználni úgy hogy negatív egész kitevőjűs hatványa legyen a határ. Azt nem tudom, hogy hogy kell hatványozni a pascalban negatív kitevővel. Amúgy a cuccot egy függvénybe szeretném megcsinálni, csak nem tom, hogy kell hatványozni.
A következő progit nemsoká leírom!
A {$N+/-} minek a fordítói direktívája? a numerikus társterület emulációé? Valahogy így rémlik, de nem vagyok benne biztos!
Somebody help! -
REAL WORLD
tag
És fel is teszed?
-
Miracle
senior tag
te mar kvázi-tag vagy, ha jol latom, nem tudom elkepzelni, hogy mindeddig ugy forumoztal itt, hogy nem vetted eszre
a: a kereses menut a forum jobb szelen
b: a sok bezart topicot, amit nem kellett volna megnyitni, csak megkeresni.
en mar eszrevettem mindkettot, ezert NEKED, HELYETTED rakerestem a pascalra:
Pascal help : Bővebben: link
Turbo Pascal : Bővebben: link
Turbo Pascal : Bővebben: link
Turbo Pascal - Elakadtam: Bővebben: link
es ez csak az 1. oldal
ennek fenyeben probalok rad nezve nem degradalo magyarazatot talalni erre a topicra, de nem megy.
[Szerkesztve] -
gErYoN
tag
Sziasztok, két kérdésem lenne:
Aktív témák
- Szeged és környéke adok-veszek-beszélgetek
- Kerékpárosok, bringások ide!
- Milyen széket vegyek?
- Apple iPhone 17 - alap
- Kettő együtt: Radeon RX 9070 és 9070 XT tesztje
- Windows 10
- Direct One (műholdas és online TV)
- Automobilista 2
- iPhone topik
- NFL és amerikai futball topik - Spoiler veszély!
- További aktív témák...
- PS4 Pro 1Tb Destiny Edition Elado
- RTX 5070 Ti OC 16G/ új, bontatlan/ 3 év garancia/ beszámítás/ ingyen foxpost
- BESZÁMÍTÁS! ASUS H510M i7 10700K 16GB DDR4 512GB SSD RTX 3070 8GB ZALMAN S2 TG Chieftec 750W
- BESZÁMÍTÁS! Gigabyte GA-H610M i3 12100F 16GB DDR4 512GB SSD RX 6600 8GB Rampage SHIVA CM 600W
- BESZÁMÍTÁS! Gigabyte H610M i3 12100F 16GB DDR4 500GB SSD RTX 2060 Super 8GB Rampage SHIVA 500W
- BESZÁMÍTÁS! ASUS H510M i5 10400F 16GB DDR4 512GB SSD RTX 3060Ti 8GB Zalman S2 TG CHIEFTEC 700W
- Xiaomi Redmi Note 13 Pro 5G 256GB, Kártyafüggetlen, 1 Év Garanciával
- Bomba ár! Acer Travelmate P214-53 - i5-1135G7 I 8GB I 512SSD I 14" FHD I Cam I W10 I Garancia
- Corsair K100 RGB Optix (CH-912A01A-FR)
- Ultimate előfizetés új fiókra akár 2736 Ft/hó áron! Azonnali, automatizált aktiválással, csak Nálam!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest