Kezdőoldal » Számítástechnika » Programozás » Mi a hiba ebbe a Pascal...

Mi a hiba ebbe a Pascal programba?

Figyelt kérdés

A feladat hogy egy tömb minden olyan eleme, amely kisebb vagy egyenlő, mint az első tag az vegye fel a '0'-t. Ez a program viszont Pascalban a (4,5,0,9,3,4,-2) tömböt (0,5,0,9,3,4,0)-ra írja át, nem (0,5,0,9,0,0,0)-ra. Valaki segítene hogy mi a hiba benne?


var n,i:integer;

v:array [1..50] of integer;

begin

readln(n);

for i:=1 to n do

read(v[i]);

for i:=1 to n do

if v[i]<=v[1] then v[i]:=0;

for i:=1 to n do

write(v[i],' ');

end.



2017. márc. 26. 14:01
 1/6 anonim ***** válasza:

Ez:


"if v[i]<=v[1] then v[i]:=0;"

2017. márc. 26. 14:37
Hasznos számodra ez a válasz?
 2/6 sharkxxx ***** válasza:

Átírtad az első elem értékét 0-ra. Onnantól kezdve az összes számot a 0-hoz viszonyította, nem a 4-hez.

Mielőtt megváltoztatod az első elem értékét, előbb meg kell azt jegyezni egy változóban.


var n,i,elso:integer;

v:array [1..50] of integer;

begin

readln(n);

for i:=1 to n do

read(v[i]);

elso := v[1] ;

for i:=1 to n do

if v[i]<=elso then v[i]:=0;

for i:=1 to n do

write(v[i],' ');

end.

2017. márc. 26. 14:42
Hasznos számodra ez a válasz?
 3/6 SimkoL ***** válasza:
A ciklust kell 2-től indítani.
2017. márc. 26. 14:45
Hasznos számodra ez a válasz?
 4/6 anonim ***** válasza:

Meg ez:


"readln(n);"


n honnan kap értéket?

2017. márc. 26. 15:02
Hasznos számodra ez a válasz?
 5/6 anonim ***** válasza:
Utolsó hülyeség, úgy látszik, még nem hatott a kávé. :)
2017. márc. 26. 15:03
Hasznos számodra ez a válasz?
 6/6 A kérdező kommentje:
Köszönöm! :)
2017. márc. 26. 15:05

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!