|
Poslao: 22 Dec 2005 21:53
|
offline
- majmunnnnn
- Novi MyCity građanin
- Pridružio: 22 Dec 2005
- Poruke: 1
|
imama problem sa pisanjem programa za rezultat i ostatak djeljenja 2 prirodna broja.ko zna nek posalje na mail zlatkob@bih.net.ba
|
|
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
|
Poslao: 22 Dec 2005 23:06
|
offline
- Strog
- Stručni saradnik
Web programiranje
- Bojan Kopanja
- Web & Mobile developer @ ZeusSoftware
- Pridružio: 26 Jul 2003
- Poruke: 2597
- Gde živiš: Stara Pazova
|
Postavi ovde detaljniji prikaz problema sa nekim svojim pokusajima resavanja istog i onda tek ocekuj neki odgovor koji mozes za nesto da upotrebis... Ovako sumnjam da ces imati puno uspeha.
|
|
|
|
|
|
|
Poslao: 23 Dec 2005 00:25
|
offline
- beli0135
- Executor
- Pridružio: 03 Jan 2005
- Poruke: 2990
- Gde živiš: Beograd
|
procedure TForm1.Button1Click(Sender:TObject);
var
nA, nB :Double
nRezultat,nOstatak :double;
iGlavnica: integer;
begin
//nekako napunis varijable nA i nB
nA:=150.201;
nB:=8.726;
nRezultat := nA / nB;
iGlavnica := Trunc (nRezultat);
nOstatak := Frac(nRezultat);
end;
|
|
|
|
|
|
|
Poslao: 08 Mar 2006 17:01
|
|
|
majmunnnnn ::imama problem sa pisanjem programa za rezultat i ostatak djeljenja 2 prirodna broja.ko zna nek posalje na mail zlatkob@bih.net.ba
program nesto;
var a,b:real;
begin
a:=5 div 3;
b:=5 mod 3;
writeln(a);
writeln(b);
readln;
end.
U outputu će pisati
1.00000000000000E+0000
2.00000000000000E+0000
pošto je 5/3 = 1 i ostatak 2...
|
|
|
|
|
|
|
Poslao: 08 Mar 2006 18:30
|
offline
- N1k0l4
- Prijatelj foruma
- Pridružio: 06 Sep 2005
- Poruke: 3800
- Gde živiš: Beograd
|
hoce da kaze da ti div daje rezultat pri deljenju a mod ostatak pri deljenju 2 broja.
Ako hoces neka dva broja da se unesu pa njih da podelis, onda samo ubacis
read(prvi);
read(drugi);
a:=prvi div drugi;
b:=prvi mod drugi;
|
|
|
|
|
|
|
Poslao: 08 Mar 2006 18:53
|
offline
- beli0135
- Executor
- Pridružio: 03 Jan 2005
- Poruke: 2990
- Gde živiš: Beograd
|
DIV i MOD su funkcije za rad sa INTEGERIMA!
Div deli 2 integera i daje celobrojnu vrednost.
MOD je deljenje 2 integera i daje samo ostatak
|
|
|
|
|
|
|
Poslao: 08 Mar 2006 19:42
|
offline
- Strog
- Stručni saradnik
Web programiranje
- Bojan Kopanja
- Web & Mobile developer @ ZeusSoftware
- Pridružio: 26 Jul 2003
- Poruke: 2597
- Gde živiš: Stara Pazova
|
Tako je, a još da napomenemo da se deljenje realnih brojeva označava sa "/", čisto ako i to zatreba  .
|
|
|
|
|
|
|
Poslao: 09 Mar 2006 12:21
|
|
|
beli0135 ::DIV i MOD su funkcije za rad sa INTEGERIMA!
Div deli 2 integera i daje celobrojnu vrednost.
MOD je deljenje 2 integera i daje samo ostatak
Jest' u pravu si. Dok to sve izvucem iz malog mozga... 
Samo treba malo promeniti kod:
readln(a);
readln(b);
c:=a/b;
writeln('Rezultat deljenja brojeva ',a,' i ',b,' je ', trunc(c),' sa ostatkom ',frac(c));
Ovde moze malo da se jos doteruje ispis, ali to je to...
|
|
|
|
|
|
