Kezdőoldal » Számítástechnika » Programozás » Az alábbi törteket hogyan...

Az alábbi törteket hogyan lehet felírni Pascalban?

Figyelt kérdés
e+h+n+ 8*(h+1)/5 + e/4 - e/100 + e/400

2016. szept. 7. 17:35
1 2
 1/17 ejbenjaro ***** válasza:
Pont úgy, ahogy ide felírtad?
2016. szept. 7. 17:49
Hasznos számodra ez a válasz?
 2/17 A kérdező kommentje:
Ha az osztást '/' jellel használom, akkor kiírja hogy használjak div-et. Dev Pascal 1.9.2-t használok.
2016. szept. 7. 17:52
 3/17 SimkoL ***** válasza:

Attól függ milyen típusú ez eredmény. Ha egész akkor nem használhatod '/'-t csak kerekítéssel vagy egészrésszel.

tehát var eredmeny : Integer; akkor

eredmeny := Round(e+h+n+8*(h+1)/5 + e/4 - e/100 + e/400); vagy

eredmeny := e+h+n+ 8*(h+1) div 5 + e div 4 - e div 100 + e div 400;

Ha a var eredmeny : Real vagy nem csak egész; akkor lehet a sima osztás

2016. szept. 7. 18:31
Hasznos számodra ez a válasz?
 4/17 anonim ***** válasza:
56%
Akkor mondjuk használj divet.
2016. szept. 7. 23:13
Hasznos számodra ez a válasz?
 5/17 SimkoL ***** válasza:
Most megköszönöm a moderátoroknak.
2016. szept. 7. 23:45
Hasznos számodra ez a válasz?
 6/17 anonim ***** válasza:
Bizonyos esetekben (ebben is) div-et kell hasznalnod, mert az eredmeny real lesz, nem pedig int.
2016. szept. 8. 10:40
Hasznos számodra ez a válasz?
 7/17 anonim ***** válasza:
Nem a konkrét feladathoz szólok hozzá, de Free Pascal-t használj Dev Pascal helyett.
2016. szept. 8. 15:12
Hasznos számodra ez a válasz?
 8/17 anonim ***** válasza:

7/es: Ahhoz sem kellett volna.

A DEV pascal az kornyezet, a fordito ott is freepascal.

2016. szept. 8. 15:23
Hasznos számodra ez a válasz?
 9/17 SimkoL ***** válasza:

Ha az eredményt nem változóba 'várjuk vissza' hanem egyből kiíratni szeretnénk akkor bármit is lehet használni.

A Pascal 'kényes' a típusokra és nem végez fordításkor átalakítást a kívánt típusra. Ezért van a variant típus, mint kaméleon, ami bármi lehet.

2016. szept. 8. 15:27
Hasznos számodra ez a válasz?
 10/17 SimkoL ***** válasza:
A DEV pascal az kornyezet, a fordito ott is freepascal.' Erre én nem vennék mérget :)
2016. szept. 8. 15:29
Hasznos számodra ez a válasz?
1 2

Kapcsolódó kérdések:





Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!