Kezdőoldal » Számítástechnika » Programozás » Valaki le tudná írni hogyan...

Valaki le tudná írni hogyan lehet? (feladat lent)

Figyelt kérdés

A felhasználótól érkező pozitív számok összegét írassuk ki, a számok bevitelének végét 0 jelezze.

PL:

Kérek egy számot: 12

Kérek egy számot: 100

Kérek egy számot: 22

Kérek egy számot: 0

A bevitt számok összege: 134


2012. máj. 24. 20:25
 1/9 anonim ***** válasza:

A legegyszerűbb módszer, ha a bekért számokat típuskonverzió után egy tömb elemeiként tárolod, kivéve ha az adott szám nulla. Ez után egy ciklussal végigmész a tömb elemein és az értékeit egy változóhoz adod (, ha az adott nyelvben nincs tomb.sum() vagy hasonló függvény).


Remélem segítettem :)

Ha valami nem tiszta, írj privit.

2012. máj. 24. 20:44
Hasznos számodra ez a válasz?
 2/9 anonim ***** válasza:
Szerintem egyszerűbb bekérni a számokat egy változóba míg az nem 0, másik változóba mely 0-ra inicializált ehhez hozzáadni mindig az aktuálisan bekért számot.
2012. máj. 24. 21:40
Hasznos számodra ez a válasz?
 3/9 A kérdező kommentje:
free pascalba kellene megoldanom :)
2012. máj. 26. 14:47
 4/9 anonim ***** válasza:
Meddig sikerült megoldani?
2012. máj. 26. 15:22
Hasznos számodra ez a válasz?
 5/9 A kérdező kommentje:
Hát nem nagyon bírtam elkezdeni :/
2012. máj. 27. 23:31
 6/9 anonim ***** válasza:

1)Először csak annyit csinálj hogy bekérsz egy számot és utána kilép a program, ennyi csak megy.

2)Utána módosítsd úgy hogy addig kérje be a számokat míg nem 0.

Utána egy változó értékét 0-ra állítasz majd utána a 2 pontban lévő kódot írod annyi módosítással hogy ehhez a változóhoz adod mindig a beolvasott számot.

Végül kiírod az összeget.

Nem olyan nehéz.

2012. máj. 27. 23:48
Hasznos számodra ez a válasz?
 7/9 A kérdező kommentje:

program szamos;

uses crt;

var adat , osszeg :integer;


begin

clrscr;

Write('Kérek egy számot(a számok bevitelének vége 0):');

osszeg:=0;

readln(adat);

while adat >0 do

begin

osszeg :=osszeg + adat;

readln(adat)

end;

writeln('A bevit számok összege: ',osszeg);

readln

end.


idáig jutottam az lenne a kérdésem hogy hogy csináljam az hogy minden szám beírásánál írja azt hogy kérek egy számot mert így csak az elsőnél írja ??

2012. máj. 28. 13:59
 8/9 anonim ***** válasza:

Mivel itt minden amit ismételsz feltétel szerint az a

while adat >0 do

begin

...

end;

között van ezért azt a kiíratást is közé kell rakni.

2012. máj. 28. 19:16
Hasznos számodra ez a válasz?
 9/9 A kérdező kommentje:
köszönöm így már jó :)
2012. máj. 28. 20:53

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!